A215558 Cubes whose final digits are the cube root.
0, 1, 64, 125, 216, 729, 13824, 15625, 117649, 132651, 421875, 438976, 970299, 1953125, 15438249, 15813251, 52734375, 53157376, 124251499, 125751501, 242970624, 244140625, 420189749, 423564751, 669921875, 997002999, 1948441249, 52776573751, 83740234375
Offset: 1
Examples
6 * 6 * 6 = 216, which has "6" as rightmost digit.
References
- Philip Carter & Ken Russell, Problem 31, p. 86, The Complete Book of Fun Maths, John Wiley, 2004.
Programs
-
Mathematica
Select[Range[0,100]^3,Mod[#,10]==Surd[#,3]||Mod[#,100]==Surd[#,3]&] (* Harvey P. Dale, Mar 03 2023 *)
-
PARI
apply(x->x^3,select(x -> (x^3 - x) % 10^(#digits(x)) == 0, [0..99])) \\ David A. Corneth, Feb 11 2020
Formula
a(n) = A033819(n)^3.