A259050 Numbers k such that 3*R_k + 10^k - 2 is prime, where R_k = 11...11 is the repunit (A002275) of length k.
1, 2, 4, 6, 94, 160, 360, 1470, 2898, 3094, 3112, 15698, 17956, 42262, 111032, 249550
Offset: 1
Examples
For k=4, 3*R_4 + 10^k - 2 = 3333 + 10000 - 2 = 13331 which is prime.
Links
- Makoto Kamada, Near-repdigit numbers of the form ABB...BBA.
- Makoto Kamada, Prime numbers of the form 133...331.
- Index entries for primes involving repunits.
Programs
-
Magma
[n: n in [0..500] | IsPrime((4*10^n-7) div 3)]; // Vincenzo Librandi, Jun 18 2015
-
Mathematica
Select[Range[0, 200000], PrimeQ[(4*10^#-7)/3] &]
-
PARI
for(k=1,1500,if(ispseudoprime(4*(10^k-1)/3-1),print1(k,", "))) \\ Hugo Pfoertner, Jul 22 2020
Extensions
a(16) from Kamada data by Tyler Busby, May 03 2024
Comments