OFFSET
1,1
LINKS
Michael De Vlieger, Table of n, a(n) for n = 1..300
MATHEMATICA
NestList[Block[{k = 1, m}, While[! PrimeQ[Set[m, 10 k # + 9]], k++]; m] &, 2, 13] (* Michael De Vlieger, Nov 14 2021 *)
CROSSREFS
KEYWORD
base,nonn
AUTHOR
Amarnath Murthy, Jan 02 2006
EXTENSIONS
Corrected and extended by Joshua Zucker, Jan 11 2006
STATUS
approved