A077743 Smallest cube ending in n, or 0 if no such cube exists.
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
Examples
a(1) = 4913 = 17^3, a(10) = 0.
Links
- Robert Israel, Table of n, a(n) for n = 1..10000
Programs
-
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
Formula
a(m*10^(3k+1)) = a(m*10^(3k+2)) = 0.
Extensions
More terms from Sascha Kurz, Jan 07 2003