OFFSET
1,1
MATHEMATICA
Select[Table[2n^2+26n+1, {n, 0, 200}], PrimeQ] (* Harvey P. Dale, Mar 09 2011 *)
PROG
(PARI) for(n=1, 100, num=2*n^2+26*n+1; if(isprime(num), print1(num, ", "))) (Jamke)
CROSSREFS
KEYWORD
nonn
AUTHOR
Tomas Xordan, Oct 19 2006
EXTENSIONS
Additional comments from Philippe Deléham, R. J. Mathar, and Herman Jamke (hermanjamke(AT)fastmail.fm).
Edited by N. J. A. Sloane, Oct 26 2006
STATUS
approved