OFFSET
1,1
LINKS
Vincenzo Librandi, Table of n, a(n) for n = 1..500
Eric Weisstein's World of Mathematics, Prime-Generating Polynomial.
MATHEMATICA
Take[Sort[Select[Table[36n^2-810n+2753, {n, 0, 1000}], PrimeQ[#] && Positive[#]&]], 40] (* Harvey P. Dale, Oct 02 2011 *)
CROSSREFS
KEYWORD
nonn,less
AUTHOR
N. J. A. Sloane, Jun 12 2001
STATUS
approved