OFFSET
1,1
COMMENTS
Observations:
1. There is a large gap between a(19) and a(20).
2. Products 2^5 * prime(i), with 3 <= i <= 17, are in the sequence.
3. Products 2^6 * prime(j), with 43391 <= j <= 82025, are in the sequence.
4. a(1) = 2^2 * 3 * 13, and terms 190, 286, and 578 are even, but do not follow the pattern of 2^h*p prime.
LINKS
Michael De Vlieger, Table of n, a(n) for n = 1..2886 (terms <= 36000000).
Michael De Vlieger, Prime decomposition of terms in a(n).
MATHEMATICA
Select[Range@ 3000, Function[n, 2 (n - (Count[Range@ n, _?(PowerMod[n, Floor@ Log2@ n, #] == 0 &)] + EulerPhi[n] - 1)) == n]] (* Michael De Vlieger, Nov 17 2017 *)
CROSSREFS
KEYWORD
nonn
AUTHOR
Michael De Vlieger, Nov 17 2017
STATUS
approved