A029777 Cubes k such that digits of cube root of k appear in k.

0, 1, 64, 125, 216, 729, 1000, 1331, 1728, 9261, 13824, 15625, 24389, 32768, 35937, 39304, 59319, 64000, 85184, 117649, 125000, 132651, 157464, 166375, 175616, 205379, 216000, 226981, 262144, 274625, 287496, 300763, 357911

Offset: 1

Author

Patrick De Geest

Keywords

• nonn
• base

Links

• Harvey P. Dale, Table of n, a(n) for n = 1..10000

Crossrefs

Cf. A029776.

Programs

Mathematica

Select[Range[0,100]^3,SubsetQ[IntegerDigits[#],IntegerDigits[CubeRoot[#]]]&] (* Harvey P. Dale, Jul 01 2025 *)

Formula

a(n) = A029776(n)^3. - Andrew Howroyd, Aug 11 2024

Extensions

Offset corrected by Andrew Howroyd, Aug 11 2024