1,2
Also numbers n such that (4*10^(n+1)-31)/9 is prime.
Index entries for primes involving repunits
Do[ If[ PrimeQ[40*(10^n - 1)/9 + 1], Print[n]], {n, 0, 7000}]
Sequence in context: A110158 A196232 A105660 * A192959 A100624 A088809
Adjacent sequences: A056678 A056679 A056680 * A056682 A056683 A056684
hard,nonn
Robert G. Wilson v (rgwv(AT)rgwv.com), Aug 10 2000