editing
approved
editing
approved
Harvey P. Dale, <a href="/A118545/b118545.txt">Table of n, a(n) for n = 1..2500</a>
approved
editing
editing
approved
Select[Range[100]^3, IntegerQ[Surd[Times@@IntegerDigits[#], 3]]&] (* Harvey P. Dale, Oct 16 2018 *)
approved
editing
24389 is in the sequence because (1) it's is a cube , , (2) the product of its digits is 2*4*3*8*9=1728 which is also cube.
base,nonn,new
Cubes for which the product of the digits is also a cube.
1, 8, 1000, 4096, 8000, 10648, 24389, 27000, 39304, 50653, 64000, 74088, 79507, 103823, 110592, 125000, 140608, 205379, 216000, 226981, 250047, 300763, 328509, 343000, 389017, 405224, 493039, 512000, 592704, 636056, 658503, 704969, 729000
1,2
24389 is in the sequence because (1) it's a cube , (2) the product of its digits is 2*4*3*8*9=1728 which is also cube.
base,nonn
Luc Stevens (lms022(AT)yahoo.com), May 03 2006
approved