A056660 Numbers k such that 20*R_k + 1 is a prime, where R_k = 11...1 is the repunit (A002275) of length k.
3, 17, 99, 120, 243, 545, 630, 1493, 2565, 8087
Offset: 1
Keywords
Links
Programs
-
Mathematica
Do[ If[ PrimeQ[ 20*(10^n - 1)/9 + 1 ], Print[n]], {n, 7000}]
Formula
a(n) = A084832(n) - 1. - Robert Price, Jan 30 2015
Extensions
a(8) and a(9) from Rick L. Shepherd, Feb 22 2004
More terms from Herman Jamke (hermanjamke(AT)fastmail.fm), Jan 01 2008
Comments