login
a(n)^3 is smallest cube containing exactly n 2's.
10

%I #19 Mar 27 2020 05:37:36

%S 3,28,138,587,612,2824,27654,29603,131468,1312748,1616488,2811574,

%T 49629974,139796852,281986403,1264554822,6146857824,16162692208,

%U 60598584603,229717543765,606069984352,2811738231378,5869673191741

%N a(n)^3 is smallest cube containing exactly n 2's.

%H Eric Weisstein's World of Mathematics, <a href="http://mathworld.wolfram.com/CubicNumber.html">Cubic Number</a>

%t a[n_] := Module[{i}, i = 1; While[DigitCount[i^3][[2]] != n, i++ ]; i]; (* Sam Handler (sam_5_5_5_0(AT)yahoo.com), Aug 23 2006 *)

%Y Cf. A036529, A048365, A048366, A048368, A048369, A048370, A048371, A048372, A048373, A048374.

%K nonn,base,more

%O 1,1

%A _Patrick De Geest_, Mar 15 1999

%E a(14) from Sam Handler (sam_5_5_5_0(AT)yahoo.com), Aug 23 2006

%E a(15)-a(20) from _Lars Blomberg_, Jun 12 2011

%E a(21)-a(22) from _Giovanni Resta_, Jun 29 2018

%E a(23) from _Giovanni Resta_, Mar 27 2020