login
A064218
Least k such that k*10^n +/- 1 are twin primes.
3
4, 3, 6, 3, 18, 240, 24, 3, 174, 93, 57, 141, 465, 501, 105, 822, 552, 324, 555, 237, 867, 1488, 543, 2556, 1050, 105, 51, 429, 1470, 147, 567, 1329, 636, 5016, 645, 4713, 1116, 1029, 462, 567, 5757, 951, 5547, 1245, 2823, 5931, 1989, 525, 6246, 1716
OFFSET
0,1
MATHEMATICA
Do[ k = 1; While[ ! PrimeQ[ k*10^n + 1 ] || ! PrimeQ[ k*10^n - 1 ], k++ ]; Print[ k ], {n, 0, 50} ]
KEYWORD
nonn
AUTHOR
Robert G. Wilson v, Sep 21 2001
EXTENSIONS
Offset corrected by Georg Fischer, May 01 2022
STATUS
approved