A092540 Primes such that their binary representation coincides with first n terms of A051023 for some n.
3, 13, 883, 237051898781, 17911135064090123664377811162569837, 1230843829352095122161574066100819070684162503
Offset: 1
Keywords
Examples
13 is a member because 13_10 = 1101_2 and {1,1,0,1} are the first 4 terms in A051023.
Links
- Eric Weisstein's World of Mathematics, Rule 30.
Programs
-
Mathematica
a[n_] := If[PrimeQ[p=A092539[[n]]], p]
Extensions
a(6) from Eric W. Weisstein, Feb 27 2004.
Comments