A143830 Primes of the form 12*n^2-1.
11, 47, 107, 191, 431, 587, 971, 1451, 2027, 2351, 2699, 3467, 4799, 5807, 6911, 7499, 8111, 8747, 10091, 10799, 14699, 15551, 16427, 17327, 18251, 25391, 27647, 36299, 41771, 44651, 55487, 57131, 62207, 67499, 71147, 74891, 80687, 92927, 99371
Offset: 1
Keywords
Programs
-
Mathematica
p = 12; a = {}; Do[k = p x^2 - 1; If[PrimeQ[k], AppendTo[a, k]], {x, 1, 1000}]; a
Comments