OFFSET
0,3
EXAMPLE
81 is in the sequence because it is a square and the product of its digits 1*8=8 is a cube.
MATHEMATICA
Select[Range[0, 200]^2, IntegerQ[Surd[Times@@IntegerDigits[#], 3]]&] (* Harvey P. Dale, Feb 01 2019 *)
CROSSREFS
KEYWORD
nonn,base
AUTHOR
Luc Stevens (lms022(AT)yahoo.com), Apr 12 2006
STATUS
approved