A143832 Primes of the form 14 n^2-1.
13, 223, 349, 503, 1399, 1693, 3583, 6173, 9463, 16183, 18143, 27103, 28349, 33613, 40823, 42349, 48733, 59149, 66653, 70573, 80863, 89599, 101149, 115933, 126349, 129023, 139999, 151423, 157303, 169399, 181943, 185149, 201599, 204973, 218749
Offset: 1
Keywords
Crossrefs
Programs
-
Mathematica
p = 14; a = {}; Do[k = p x^2 - 1; If[PrimeQ[k], AppendTo[a, k]], {x, 1, 1000}]; a Select[14*Range[200]^2-1,PrimeQ] (* Harvey P. Dale, Jul 29 2024 *)
Comments