OFFSET
1,1
LINKS
Vincenzo Librandi, Table of n, a(n) for n = 1..1000
MATHEMATICA
Select[Table[5 + 38 n^2, {n, 0, 70}], PrimeQ] (* Harvey P. Dale, Dec 16 2010 *)
PROG
(Magma) [a: n in [0..100] | IsPrime(a) where a is 5+38*n^2 ]; // Vincenzo Librandi, Jan 02 2014
CROSSREFS
KEYWORD
nonn
AUTHOR
Vincenzo Librandi, Feb 21 2010
EXTENSIONS
Corrected by D. S. McNeil, Dec 10 2010
STATUS
approved