A099409 Numbers k such that 2*R_k + 5 is prime, where R_k = 11...1 is the repunit (A002275) of length k.
0, 1, 3, 9, 15, 28, 64, 1168, 1695, 2362, 116620, 336405
Offset: 1
Keywords
Links
Programs
-
Magma
[n: n in [0..1000] | IsPrime( 2*(10^n - 1) div 9 + 5)]; // Vincenzo Librandi, Oct 28 2014
-
Mathematica
Do[ If[ PrimeQ[ 2(10^n - 1)/9 + 5], Print[n]], {n, 0, 5000}]
Formula
a(n) = A056677(n-1) + 1.
Extensions
Added a(1)=0, adapted Mathematica program, Vincenzo Librandi, Oct 28 2014
a(11)-a(12) from Kamada data by Tyler Busby, May 03 2024
Comments