A099417 Numbers k such that 5*R_k + 2 is prime, where R_k = 11...1 is the repunit (A002275) of length k.
0, 1, 3, 4, 6, 10, 15, 22, 88, 207, 528, 960, 2100, 18522, 36783, 38517
Offset: 1
Keywords
Links
Programs
-
Mathematica
Do[ If[ PrimeQ[ 5(10^n - 1)/9 + 2], Print[n]], {n, 0, 5000}]
Formula
a(n) = A056686(n-1) + 1.
Extensions
a(14)-a(16) from Robert Price, Oct 18 2014
Comments