OFFSET
1,1
MATHEMATICA
a = {}; Do[If[PrimeQ[32n + 31], AppendTo[a, n]], {n, 1, 200}]; a
CROSSREFS
KEYWORD
nonn
AUTHOR
Artur Jasinski, Jan 19 2007
STATUS
approved