login
A077743
Smallest cube ending in n, or 0 if no such cube exists.
3
1, 512, 343, 64, 125, 216, 27, 8, 729, 0, 357911, 512, 4913, 0, 0, 216, 389017, 0, 59319, 0, 68921, 0, 103823, 13824, 125, 0, 27, 1728, 729, 0, 1331, 5832, 456533, 0, 0, 97336, 35937, 0, 493039, 0, 531441, 0, 343, 2744, 0, 0, 250047, 10648, 117649, 0, 132651
OFFSET
1,2
LINKS
FORMULA
a(m*10^(3k+1)) = a(m*10^(3k+2)) = 0.
EXAMPLE
a(1) = 4913 = 17^3, a(10) = 0.
MAPLE
f:= proc(n) local m, r, x;
m:= 10^(ilog10(n)+1);
r:= [msolve(x^3=n, m)];
if r = [] then 0 else min(map(t -> rhs(op(t)), r))^3 fi
end proc:
map(f, [$1..100]); # Robert Israel, Mar 05 2023
CROSSREFS
KEYWORD
base,nonn
AUTHOR
Amarnath Murthy, Nov 20 2002
EXTENSIONS
More terms from Sascha Kurz, Jan 07 2003
STATUS
approved