A061813 When cubed gives number composed just of the digits 1, 2, 3, 4, 5.

1, 5, 7, 8, 11, 68, 81, 177, 351, 605, 1311, 1645, 1758, 2247, 2474, 2485, 2824, 6165, 7568, 11217, 15228, 28114, 28128, 28947, 115558, 224681, 225805, 351758, 357141, 357147, 622407, 1039247, 1291547, 1366824, 1490628, 1616651, 2324085, 2371737

Offset: 1

Author

Robert G. Wilson v, Jun 23 2001

Keywords

• base
• nonn

Links

• Chai Wah Wu, Table of n, a(n) for n = 1..200

Programs

Mathematica

Do[ If[ Union[ Join[ {1, 2, 3, 4, 5}, IntegerDigits[n^3] ] ] == {1, 2, 3, 4, 5}, Print[n] ], {n, 0, 10^7} ]

Extensions

a(37) corrected by Chai Wah Wu, Feb 25 2016