A093162 Primes of the form 20*R_k + 3, where R_k is the repunit (A002275) of length k.
3, 23, 223, 22222223, 22222222223, 222222222222222222222222222222222223
Offset: 1
Keywords
Links
Programs
-
Mathematica
Select[Table[FromDigits[PadLeft[{3},n,2]],{n,40}],PrimeQ] (* Harvey P. Dale, Dec 26 2022 *)
Extensions
Edited by Ray Chandler, Feb 27 2012
Comments