OFFSET
1,1
MATHEMATICA
Select[Range[2, 500], PrimeQ[3 #^2 - 5] &]
PROG
(Magma) [n: n in [2..400] | IsPrime(3*n^2-5)];
CROSSREFS
KEYWORD
nonn
AUTHOR
Vincenzo Librandi, Feb 16 2016
STATUS
approved