OFFSET
1,3
LINKS
Harvey P. Dale, Table of n, a(n) for n = 1..1601
FORMULA
a(n) = A029779(n)^(1/3). - Sean A. Irvine, Mar 04 2020
MATHEMATICA
Select[Range[0, 600000], SubsetQ[IntegerDigits[#], IntegerDigits[#^3]]&] (* using SubsetQ function from Mathematica 10 *) (* Harvey P. Dale, Jul 13 2014 *)
CROSSREFS
KEYWORD
nonn,base
AUTHOR
EXTENSIONS
Offset corrected by Sean A. Irvine, Mar 04 2020
STATUS
approved