OFFSET
1,2
COMMENTS
Also numbers k such that (17*10^k + 1)/9 is prime.
No more terms below 133000. - Serge Batalov, May 15 2010
a(11) > 2*10^5. - Robert Price, Nov 16 2014
LINKS
FORMULA
a(n) = A102031(n) + 1.
MAPLE
A102945:=n->`if`(isprime((17*10^n+1)/9), n, NULL): seq(A102945(n), n=1..10^3); # Wesley Ivan Hurt, Nov 16 2014
MATHEMATICA
Do[ If[ PrimeQ[(17*10^n + 1)/9], Print[n]], {n, 0, 10000}]
Select[Range[1000], PrimeQ[(17 10^# + 1) / 9] &] (* Vincenzo Librandi, Nov 17 2014 *)
PROG
(Magma) [n: n in [0..300] | IsPrime((17*10^n+1) div 9)]; // Vincenzo Librandi, Nov 17 2014
CROSSREFS
KEYWORD
more,nonn
AUTHOR
Robert G. Wilson v, Dec 16 2004
EXTENSIONS
More PRP terms a(7)-a(10). Sieved with srsieve and tested with Prime95 by Serge Batalov, May 15 2010
STATUS
approved