OFFSET
1,2
COMMENTS
This sequence is infinite under Bunyakovsky's conjecture. - Charles R Greathouse IV, Apr 26 2012
LINKS
T. D. Noe, Table of n, a(n) for n = 1..1000 (from Yves Gallot)
Yves Gallot, Generalized Fermat Prime Search
Jeppe Stig Nielsen, Generalized Fermat Primes sorted by base.
Eric Weisstein's World of Mathematics, Generalized Fermat Number
MATHEMATICA
Do[ k = 1; While[ PowerMod[ n, 1024, 2*k*1024 + 1 ] != 2*k*1024 && k < 2*10^6, k++ ]; If[ k == 2*10^6 && PrimeQ[ n^1024 + 1 ], Print[ n ] ], {n, 2, 13954, 2} ]
Do[If[PrimeQ[n^1024 + 1], Print[n], ## &[]], {n, 1, 100}] (* Includes first term and runs faster, Daniel Jolly, Nov 04 2014 *)
PROG
(PARI) isA057002(n) = isprime(n^1024+1) \\ Michael B. Porter, Apr 03 2010
CROSSREFS
KEYWORD
nonn
AUTHOR
Robert G. Wilson v, Sep 09 2000
EXTENSIONS
More terms from Jeppe Stig Nielsen, Sep 27 2003
Edited at the suggestion of T. D. Noe by N. J. A. Sloane, May 14 2008
STATUS
approved