OFFSET
1,1
LINKS
Michael De Vlieger, Table of n, a(n) for n = 1..300
MATHEMATICA
a[1]=2; a[n_]:=a[n]=(For[m=1, !PrimeQ[m a[n-1]*10+3], m++ ]; 10m*a[n-1]+3); Table[a[n], {n, 15}]
CROSSREFS
KEYWORD
base,nonn
AUTHOR
Amarnath Murthy, Jan 02 2006
EXTENSIONS
More terms from Joshua Zucker and Farideh Firoozbakht, Jan 05 2006
STATUS
approved