OFFSET
1,1
COMMENTS
Also numbers n such that (55*10^n+17)/9 is prime.
a(16) > 10^5 - Robert Price, Sep 09 2015
LINKS
FORMULA
a(n) = A101519(n) + 1.
MATHEMATICA
Do[ If[ PrimeQ[(55*10^n + 17)/9], Print[n]], {n, 0, 10000}]
Select[Range[0, 10000], PrimeQ[(55 10^# + 17)/9] &] (* Vincenzo Librandi, Sep 10 2015 *)
PROG
(Magma) [n: n in [0..500]| IsPrime((55*10^n + 17) div 9)]; // Vincenzo Librandi, Sep 10 2015
CROSSREFS
KEYWORD
more,nonn
AUTHOR
Robert G. Wilson v, Jan 18 2005
EXTENSIONS
Addition of a(14)-a(15) from Kamada data by Robert Price, Dec 12 2010
STATUS
approved