OFFSET
1,2
COMMENTS
Also numbers n such that (46*10^n+53)/9 is prime.
a(6) > 10^5. - Robert Price, Jun 20 2015
LINKS
FORMULA
a(n) = A101571(n-1) + 1.
MATHEMATICA
Do[ If[ PrimeQ[(46*10^n + 53)/9], Print[n]], {n, 0, 10000}]
Select[Range[0, 15100], PrimeQ[FromDigits[Join[PadRight[{5}, #, 1], {7}]]]&] (* Harvey P. Dale, Mar 13 2012 *)
CROSSREFS
KEYWORD
more,nonn
AUTHOR
Robert G. Wilson v, Jan 18 2005
EXTENSIONS
One more PRP term from Serge Batalov, Oct 13 2008
Addition of a(5) from Kamada data by Robert Price, Dec 13 2010
STATUS
approved