OFFSET
1,2
COMMENTS
Also, numbers k such that (646*10^k - 7)/9 is prime.
Terms from Kamada.
a(26) > 10^5. Robert Price, Jul 31 2016
LINKS
Makoto Kamada, Factorization of near-repdigit-related numbers.
Makoto Kamada, Search for 717w.
EXAMPLE
For k=2, 7*R_4 - 6*10^2 = 7777 - 600 = 7177 which is prime.
a(1)=0 associated with 71, a(2)=2 associated with 7177, a(3)=3 associated with 71777, a(4)=9 associated with 71777777777, etc. - Robert Price, Jul 31 2016
MATHEMATICA
Select[Range[0, 100000], PrimeQ[(646*10^#-7)/9 ] &]
PROG
(PARI) for(n=0, 200, if(isprime((646*10^n-7)/9), print1(n, ", "))) \\ Derek Orr, Apr 14 2015
(Magma) [n: n in [0..300] | IsPrime((646*10^n-7) div 9)]; // Vincenzo Librandi, Apr 15 2015
CROSSREFS
KEYWORD
more,hard,nonn
AUTHOR
Robert Price, Apr 14 2015
EXTENSIONS
a(25) from Robert Price, Jul 31 2016
STATUS
approved