OFFSET
1,1
COMMENTS
Also numbers n such that (26*10^n-17)/9 is prime.
a(13) > 10^5. - Robert Price, Mar 28 2015
LINKS
FORMULA
a(n) = A101971(n) + 1.
MATHEMATICA
Do[ If[ PrimeQ[(26*10^n - 17)/9], Print[n]], {n, 0, 10000}]
Select[Range[10000], PrimeQ[(26 10^# - 17) / 9] &] (* Vincenzo Librandi, Mar 29 2015 *)
PROG
(Magma) [n: n in [0..100] | IsPrime((26*10^n-17) div 9)]; // Vincenzo Librandi, Mar 29 2015
CROSSREFS
KEYWORD
more,nonn
AUTHOR
Robert G. Wilson v, Dec 17 2004
EXTENSIONS
Addition of a(11) from Kamada data by Robert Price, Dec 13 2010
a(12) from Erik Branger May 01 2013 by Ray Chandler, Aug 16 2013
STATUS
approved