OFFSET
1,1
COMMENTS
LINKS
Eric Weisstein's World of Mathematics, Prime-generating Polynomial
EXAMPLE
MATHEMATICA
Select[Table[272259344081+2*n^2, {n, 0, 100}], PrimeQ]
PROG
(PARI) for(n=0, 100, isprime(272259344081+2*n^2) && print1(272259344081+2*n^2, ", "))
CROSSREFS
KEYWORD
nonn
AUTHOR
Waldemar Puszkarz, Apr 05 2016
STATUS
approved