OFFSET
1,1
COMMENTS
Subset of A002476. See also A121326. The values of k for which 6*k^2 + 1 is prime are 1, 4, 5, 9, 10, 11, 21, 24, 26, 35, 39, 40, 44, 46, 49, 51, 54, 59, 60, 70, 75, 79, 81, 84, 89, 94, 95, 109, 114, 116, 119, 126, 131, 136, 145, 154, ... - Jonathan Vos Post, Aug 27 2006
LINKS
Vincenzo Librandi, Table of n, a(n) for n = 1..5000
MATHEMATICA
Select[Table[6n^2+1, {n, 0, 1000}], PrimeQ] (* Vincenzo Librandi, Dec 03 2011 *)
PROG
(PARI) mx2pmp(n) = { for(x=1, n, y = 6*x^2+1; if(isprime(y), print1(y", ")) ) }
(Magma) [a: n in [0..600] | IsPrime(a) where a is 6*n^2+1]; // Vincenzo Librandi, Dec 03 2011
CROSSREFS
KEYWORD
easy,nonn
AUTHOR
Cino Hilliard, Dec 18 2003
EXTENSIONS
Edited by N. J. A. Sloane at the suggestion of R. J. Mathar, Apr 14 2008
STATUS
approved