|
|
A030690
|
|
Smallest nontrivial extension of n-th square which is a cube.
|
|
4
|
|
|
125, 4096, 9261, 166375, 250047, 3652264, 4913, 64000, 8120601, 1000, 12167, 1442897, 16974593, 19683, 225866529, 25672375, 28934443, 3241792, 3616805375, 40001688, 4410944, 4843965888, 529475129, 5764224257
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
LINKS
|
|
|
PROG
|
(Python)
from gmpy2 import iroot
d, nd = 10, 10*n**2
while True:
x = (iroot(nd-1, 3)[0]+1)**3
if x < nd+d:
return int(x)
d *= 10
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn,base
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|