OFFSET
0,1
REFERENCES
Richard K. Guy, Unsolved Problems in Number Theory, New York, Springer-Verlag, 1994
Friedhelm Padberg, Elementare Zahlentheorie, Spektrum Akademischer Verlag, Berlin Heidelberg, 1996
Daniel Shanks, Solved and Unsolved Problems in Number Theory, 4th ed., New York, Chelsea, 1993
LINKS
T. D. Noe, Table of n, a(n) for n = 0..300
Ken Takusagawa, Twin primes
EXAMPLE
2^0 + 2 = 3 = prime(2), 2^0 + 4 = 5 = prime(3).
2^1 + 1 = 3 = prime(2), 2^1 + 3 = 5 = prime(3).
2^2 + 1 = 5 = prime(3), 2^2 + 3 = 7 = prime(4).
MATHEMATICA
Join[{2}, Table[s = 2^n + 1; While[! (PrimeQ[s] && PrimeQ[s + 2]), s = s + 2]; s - 2^n, {n, 60}]] (* T. D. Noe, May 08 2012 *)
PROG
(PARI) A173937(n)={forstep(p=2^n\6*6+5, 2<<n, 6, isprime(p)||next; isprime(p+2)&return(p-2^n)); 2-n} \\ M. F. Hasler, Oct 21 2012
CROSSREFS
KEYWORD
nonn
AUTHOR
Eva-Maria Zschorn (e-m.zschorn(AT)zaschendorf.km3.de), Mar 03 2010
EXTENSIONS
Values a(0..300) double-checked by M. F. Hasler, Oct 21 2012
STATUS
approved