login
A143828
Primes of the form 10*k^2 - 1.
8
89, 359, 809, 1439, 4409, 8999, 10889, 12959, 20249, 23039, 35999, 47609, 51839, 56249, 65609, 75689, 98009, 116639, 123209, 129959, 136889, 143999, 151289, 158759, 166409, 234089, 272249, 282239, 302759, 313289, 334889, 404009, 416159
OFFSET
1,1
LINKS
MATHEMATICA
p = 10; a = {}; Do[k = p x^2 - 1; If[PrimeQ[k], AppendTo[a, k]], {x, 1, 1000}]; a
Select[Table[10n^2-1, {n, 1, 800}], PrimeQ] (* Vincenzo Librandi, Dec 07 2011 *)
PROG
(Magma) [a: n in [1..400] | IsPrime(a) where a is 10*n^2-1]; // Vincenzo Librandi, Dec 07 2011
CROSSREFS
KEYWORD
nonn,easy
AUTHOR
Artur Jasinski, Sep 02 2008
STATUS
approved