|
|
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
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
0,1
|
|
LINKS
|
|
|
MATHEMATICA
|
Do[ k = 1; While[ ! PrimeQ[ k*10^n + 1 ] || ! PrimeQ[ k*10^n - 1 ], k++ ]; Print[ k ], {n, 0, 50} ]
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|