OFFSET
1,2
COMMENTS
Also numbers n such that (49*10^n-31)/9 is prime.
a(20) > 10^5. - Robert Price, Jul 16 2015
LINKS
FORMULA
a(n) = A101578(n-1) + 1, for n>1.
MATHEMATICA
Do[ If[ PrimeQ[(49*10^n - 31)/9], Print[n]], {n, 0, 10000}]
CROSSREFS
KEYWORD
more,nonn
AUTHOR
Robert G. Wilson v, Jan 18 2005
EXTENSIONS
a(17)-a(18) from Kamada data by Robert Price, Dec 14 2010
a(1) = 0 prepended by Robert Price, Jul 16 2015
a(19) from Robert Price, Jul 16 2015
STATUS
approved