|
|
A089700
|
|
Smallest n-digit member of A089699.
|
|
2
|
|
|
1, 12, 112, 1116, 11112, 111126, 1111156, 11111116, 111111112, 1111111212, 11111111112, 111111111366, 1111111111152, 11111111111122, 111111111111232, 1111111111111122, 11111111111111152, 111111111111111636, 1111111111111111542, 11111111111111111266
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,2
|
|
LINKS
|
|
|
MAPLE
|
for d from 1 to 20 do n:=(10^d-1)/9: n:=nextprime(n): while(not isprime(mul(j, j=convert(n-1, base, 10))+1)) do n:=nextprime(n) od: printf("%d, ", n-1) od: # C. Ronaldo
|
|
CROSSREFS
|
|
|
KEYWORD
|
base,nonn
|
|
AUTHOR
|
|
|
EXTENSIONS
|
Corrected and extended by C. Ronaldo (aga_new_ac(AT)hotmail.com), Dec 25 2004
|
|
STATUS
|
approved
|
|
|
|