A048369 a(n)^3 is smallest cube containing exactly n 4's.

4, 14, 114, 164, 763, 3543, 17066, 13464, 163974, 757364, 3421244, 6727219, 28902604, 35685649, 761777604, 1350780517, 2543012249, 7633715304, 101476238101, 163186746514, 353823251814, 5708006133707

Offset: 1

Author

Patrick De Geest, Mar 15 1999

Keywords

• nonn
• base
• more

Links

• Eric Weisstein's World of Mathematics, Cubic Number

Crossrefs

Cf. A036531, A048365, A048366, A048367, A048368, A048370, A048371, A048372, A048373, A048374.

Programs

Mathematica

nsmall = Table[Infinity, 15];
For[i = 0, i <= 10^6, i++, n0 = Count[IntegerDigits[i^3], 4];
  If[nsmall[[n0]] > i, nsmall[[n0]] = i]];
Cases[nsmall, ?NumberQ] (* _Robert Price, Mar 20 2020 *)

Extensions

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

a(21) from Giovanni Resta, Jun 29 2018

a(22) from Giovanni Resta, Mar 23 2020