OFFSET
1,1
COMMENTS
Primes whose binary representation has the 0 and prime bits set up to prime(n). The values of n are in A159260.
MATHEMATICA
s=1; Reap[Do[s=s+2^Prime[n]; If[PrimeQ[s], Sow[s]], {n, 50}]][[2, 1]]
CROSSREFS
KEYWORD
nonn
AUTHOR
T. D. Noe, Apr 07 2009
STATUS
approved