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 A036536 #13 Mar 20 2020 22:30:03 %S A036536 0,729,29791,970299,994011992,997002999,499999005953,999700029999, %T A036536 999940001199992,999970000299999,991023990975990999, %U A036536 999997000002999999,299243659909999996099,999999700000029999999,929999949497863992829999,999100239990997599909999 %N A036536 Smallest cube containing exactly n 9's. %C A036536 a(n)^(1/3) = A048374(n) is the index of the first occurrence of n in sequence A269249. - _M. F. Hasler_, Feb 21 2016 %H A036536 Giovanni Resta, <a href="/A036536/b036536.txt">Table of n, a(n) for n = 0..23</a> %F A036536 a(n) = A048374(n)^3. - _M. F. Hasler_, Feb 21 2016 %t A036536 nsmall = Table[Infinity, 15]; %t A036536 For[i = 0, i <= 10^6, i++, n0 = Count[IntegerDigits[i^3], 9]; %t A036536 If[nsmall[[n0 + 1]] > i^3, nsmall[[n0 + 1]] = i^3]]; %t A036536 Cases[nsmall, _?NumberQ] (* _Robert Price_, Mar 20 2020 *) %Y A036536 Cf. A048374, A036527 - A036535 for other digits 0 - 8. %Y A036536 Analog for squares: A036516 = A048354^2. %K A036536 nonn,base %O A036536 0,2 %A A036536 _David W. Wilson_ %E A036536 Extended with a(0) = 0 by _M. F. Hasler_, Feb 21 2016 %E A036536 a(12)-a(15) from _Giovanni Resta_, Jun 29 2018