OFFSET
1,1
COMMENTS
LINKS
T. D. Noe, Table of n, a(n) for n=1..1000
MATHEMATICA
lst={}; Do[If[PrimeQ[p=16*n+13], AppendTo[lst, p]], {n, 0, 5!}]; lst (* Vladimir Joseph Stephan Orlovsky, Jan 28 2009 *)
CROSSREFS
KEYWORD
nonn
AUTHOR
T. D. Noe, Jun 12 2008
STATUS
approved