OFFSET
1,2
COMMENTS
Also numbers n such that (76*10^n-31)/9 is prime.
a(20) > 10^5. - Robert Price, Oct 20 2015
LINKS
FORMULA
a(n) = A101066(n-1) + 1, for n>1.
MATHEMATICA
Do[ If[ PrimeQ[(76*10^n - 31)/9], Print[n]], {n, 0, 10000}]
PROG
(PARI) for(n=0, 1e3, if(isprime((76*10^n-31)/9), print1(n", "))) \\ Altug Alkan, Oct 20 2015
CROSSREFS
KEYWORD
more,nonn
AUTHOR
Robert G. Wilson v, Jan 19 2005
EXTENSIONS
a(16)-a(19) from Kamada data by Robert Price, Dec 14 2010
Inserted a(1)=0 by Robert Price, Oct 20 2015
STATUS
approved