OFFSET
1,1
LINKS
Harvey P. Dale, Table of n, a(n) for n = 1..100
MATHEMATICA
lm3[n_]:=Module[{k=1}, While[!PrimeQ[10k*n+3], k++]; 10k*n+3]; NestList[ lm3, 5, 20] (* Harvey P. Dale, May 05 2019 *)
CROSSREFS
KEYWORD
base,nonn
AUTHOR
Amarnath Murthy, Jan 03 2006
EXTENSIONS
More terms from Joshua Zucker, Jan 11 2006
STATUS
approved