This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.
%I A048369 #19 Feb 16 2025 08:32:40 %S A048369 4,14,114,164,763,3543,17066,13464,163974,757364,3421244,6727219, %T A048369 28902604,35685649,761777604,1350780517,2543012249,7633715304, %U A048369 101476238101,163186746514,353823251814,5708006133707 %N A048369 a(n)^3 is smallest cube containing exactly n 4's. %H A048369 Eric Weisstein's World of Mathematics, <a href="https://mathworld.wolfram.com/CubicNumber.html">Cubic Number</a> %t A048369 nsmall = Table[Infinity, 15]; %t A048369 For[i = 0, i <= 10^6, i++, n0 = Count[IntegerDigits[i^3], 4]; %t A048369 If[nsmall[[n0]] > i, nsmall[[n0]] = i]]; %t A048369 Cases[nsmall, _?NumberQ] (* _Robert Price_, Mar 20 2020 *) %Y A048369 Cf. A036531, A048365, A048366, A048367, A048368, A048370, A048371, A048372, A048373, A048374. %K A048369 nonn,base,more %O A048369 1,1 %A A048369 _Patrick De Geest_, Mar 15 1999 %E A048369 a(15)-a(20) from _Lars Blomberg_, Jun 12 2011 %E A048369 a(21) from _Giovanni Resta_, Jun 29 2018 %E A048369 a(22) from _Giovanni Resta_, Mar 23 2020