OFFSET
1,2
LINKS
Harvey P. Dale, Table of n, a(n) for n = 1..1000
MATHEMATICA
p = 14; a = {}; Do[k = p x^2 - 1; If[PrimeQ[k], AppendTo[a, x]], {x, 1, 1000}]; a
Select[Range[300], PrimeQ[14#^2-1]&] (* Harvey P. Dale, Aug 29 2011 *)
PROG
(PARI) is(n)=isprime(14*n^2-1) \\ Charles R Greathouse IV, Feb 20 2017
CROSSREFS
KEYWORD
nonn
AUTHOR
Artur Jasinski, Sep 02 2008
STATUS
approved