OFFSET
1,1
COMMENTS
Primes appearing in A092539.
LINKS
Eric Weisstein's World of Mathematics, Rule 30.
EXAMPLE
13 is a member because 13_10 = 1101_2 and {1,1,0,1} are the first 4 terms in A051023.
MATHEMATICA
a[n_] := If[PrimeQ[p=A092539[[n]]], p]
CROSSREFS
KEYWORD
nonn
AUTHOR
Zak Seidov, Feb 27 2004
EXTENSIONS
a(6) from Eric W. Weisstein, Feb 27, 2004.
The next term is too large to include.
STATUS
approved