login
A128949
Smallest primes > 2^n that are twin prime members.
2
3, 5, 11, 17, 521, 1031, 65537, 8388617, 862718293348820473429344482784628181556388621521298319395315527975161, 56539106072908298546665520023773392506479484700019806659891398441363833147
OFFSET
1,1
COMMENTS
A prime is included only if it is both the smallest prime greater than 2^n and also the smaller of a twin-prime pair. - Harvey P. Dale, Aug 24 2013
LINKS
FORMULA
a(n) = A014210(A128944(n)).
MATHEMATICA
Select[NextPrime[2^Range[250]], PrimeQ[#+2]&] (* Harvey P. Dale, Aug 24 2013 *)
PROG
(PARI) g(n, b)=for(x=1, n, y=nextprime(b^x); if(ispseudoprime(y+2), print1(y", ")))
CROSSREFS
Intersection of A014210 (Next prime after 2^n) and A001097 (Twin primes).
Cf. A128944.
Sequence in context: A347078 A270778 A267030 * A070316 A298121 A373273
KEYWORD
nonn
AUTHOR
Cino Hilliard, Apr 28 2007
EXTENSIONS
Edited by Ray Chandler, May 12 2007
a(10) from Harvey P. Dale, Aug 24 2013
STATUS
approved