%I #6 Aug 22 2021 13:31:33

%S 0,1,343,1000,1331,4096,8000,10648,19683,27000,39304,50653,64000,

%T 74088,79507,103823,110592,125000,140608,148877,205379,216000,238328,

%U 250047,300763,328509,343000,389017,405224,493039,512000,551368,592704,636056

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

%C Any cube with a zero digit is a term of this sequence. Of the first 10,000 terms, only 331 have no zero digits. The largest such zero-free cube in the first 10,000 terms is 2956841564977. - _Harvey P. Dale_, Aug 22 2021

%H Harvey P. Dale, <a href="/A117689/b117689.txt">Table of n, a(n) for n = 0..10000</a>

%e 19683 is in the sequence because it is a cube and the product of its digits 1*9*6*8*3=1296 is a square.

%t Select[Range[0,100]^3,IntegerQ[Sqrt[Times@@IntegerDigits[#]]]&] (* _Harvey P. Dale_, Aug 22 2021 *)

%Y Cf. A000290, A000578.

%K nonn,base

%O 0,3

%A Luc Stevens (lms022(AT)yahoo.com), Apr 12 2006