login
Cubes for which the product of the digits is also a cube.
1

%I #6 Oct 16 2018 19:00:10

%S 1,8,1000,4096,8000,10648,24389,27000,39304,50653,64000,74088,79507,

%T 103823,110592,125000,140608,205379,216000,226981,250047,300763,

%U 328509,343000,389017,405224,493039,512000,592704,636056,658503,704969,729000

%N Cubes for which the product of the digits is also a cube.

%H Harvey P. Dale, <a href="/A118545/b118545.txt">Table of n, a(n) for n = 1..2500</a>

%e 24389 is in the sequence because (1) it is a cube, (2) the product of its digits is 2*4*3*8*9=1728 which is also cube.

%t Select[Range[100]^3,IntegerQ[Surd[Times@@IntegerDigits[#],3]]&] (* _Harvey P. Dale_, Oct 16 2018 *)

%K base,nonn

%O 1,2

%A Luc Stevens (lms022(AT)yahoo.com), May 03 2006