A048371 a(n)^3 is smallest cube containing exactly n 6's.

4, 55, 36, 716, 1188, 4055, 13832, 18821, 190806, 1542023, 3971816, 13881356, 55009989, 154057624, 551727536, 1881662989, 4014051821, 15448244536, 185043243523, 405480132286, 550651031786, 4425284190954, 4881712198556

Offset: 1

Author

Patrick De Geest, Mar 15 1999

Keywords

• nonn
• base
• more

Links

• Eric Weisstein's World of Mathematics, Cubic Number

Crossrefs

Cf. A036533, A048365, A048366, A048367, A048368, A048369, A048370, A048372, A048373, A048374.

Programs

Mathematica

a[n_] := Module[{i = 0}, While[DigitCount[i^3][[6]] != n, i++ ]; i]; (* Sam Handler (sam_5_5_5_0(AT)yahoo.com), Aug 27 2006 *)

Extensions

a(14) from Sam Handler (sam_5_5_5_0(AT)yahoo.com), Aug 27 2006

a(15)-a(20) from Lars Blomberg, Jun 12 2011

a(21)-a(23) from Giovanni Resta, Jun 29 2018