OFFSET
1,3
COMMENTS
Also numbers k such that (5*10^(k+1)-23)/9 is prime.
a(12) > 10^5. - Robert Price, Nov 13 2014
LINKS
FORMULA
MATHEMATICA
Do[ If[ PrimeQ[50*(10^n - 1)/9 + 3], Print[n]], {n, 0, 5000}]
Select[Range[0, 3000], PrimeQ[(5 10^(# + 1) - 23) / 9] &] (* Vincenzo Librandi, Nov 14 2014 *)
PROG
(Magma) [n: n in [0..400]| IsPrime((5*10^(n+1)-23)div 9)]; // Vincenzo Librandi, Nov 14 2014
CROSSREFS
KEYWORD
hard,nonn
AUTHOR
Robert G. Wilson v, Aug 10 2000
EXTENSIONS
a(11) derived from A099416 by Robert Price, Nov 13 2014
STATUS
approved