%I #9 Mar 31 2012 12:39:03
%S 3,13,883,237051898781,17911135064090123664377811162569837,
%T 1230843829352095122161574066100819070684162503
%N Primes such that their binary representation coincides with first n terms of A051023 for some n.
%C Primes appearing in A092539.
%H Eric Weisstein's World of Mathematics, <a href="http://mathworld.wolfram.com/Rule30.html">Rule 30</a>.
%e 13 is a member because 13_10 = 1101_2 and {1,1,0,1} are the first 4 terms in A051023.
%t a[n_] := If[PrimeQ[p=A092539[[n]]], p]
%Y Cf. A051023, A092539.
%K nonn
%O 1,1
%A _Zak Seidov_, Feb 27 2004
%E a(6) from _Eric W. Weisstein_, Feb 27, 2004.
%E The next term is too large to include.
|