OFFSET
1,1
LINKS
James C. McMahon, Table of n, a(n) for n = 1..100
MATHEMATICA
a[1]=5; a[n_]:=NextPrime[100a[n-1], -1]; Table[a[n], {n, 15}] (* James C. McMahon, Dec 15 2024 *)
CROSSREFS
KEYWORD
nonn
AUTHOR
Artur Jasinski, Dec 16 2006
EXTENSIONS
a(13)-(15) from James C. McMahon, Dec 15 2024
STATUS
approved