|
|
|
|
31, 421, 521, 7321, 84221, 94321, 147432221, 18964332221, 29149754433222221, 38191297654433322222221, 39191397654433332222221, 63312115121097765544433333322222222221, 743724181412109876655444433333322222222222221
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
LINKS
|
|
|
MAPLE
|
for n from 1 to 300 do a := n:k := 2:d := floor(n/k); while(d>0) do a := d+10^( floor(evalf(log(d)/log(10))+0.0000000001 )+1)*a: if(d=1) then k := n:end if:k := k+1:d := floor(n/k):end do:b[n] := a; end do:j := 0:for i from 1 to 300 do if(isprime(b[i])) then j := j+1:q[j] := b[i]:end if:end do:seq(q[k], k=1..j);
|
|
CROSSREFS
|
|
|
KEYWORD
|
base,nonn
|
|
AUTHOR
|
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|