A306855 Primes of the form 10^i + 10^j - 1.
19, 109, 199, 1009, 1999, 10009, 10099, 100999, 199999, 1000099, 1000999, 19999999, 1000000009, 1000009999, 1000099999, 1009999999, 10000000999, 10000099999, 10999999999, 100999999999, 1000000009999, 1000000999999, 1099999999999, 10000000000099, 10009999999999, 100000000000099, 100000009999999
Offset: 1
Links
- Robert Israel, Table of n, a(n) for n = 1..2000
Programs
-
Maple
select(isprime, [seq(seq(10^n+10^m-1, m=1..n),n=1..15)]);
-
Mathematica
Select[Flatten[Table[FromDigits[Join[PadRight[{1},n,0],PadRight[{},m,9]]],{n,20},{m,20}]],PrimeQ]//Sort (* Harvey P. Dale, May 15 2021 *)
Comments