login
Number of cubes between 10n and 10n+9 (inclusive).
2

%I #6 Oct 12 2019 11:52:22

%S 3,0,1,0,0,0,1,0,0,0,0,0,1,0,0,0,0,0,0,0,0,1,0,0,0,0,0,0,0,0,0,0,0,0,

%T 1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,

%U 0,0,0,0,1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,1,0,0,0,0

%N Number of cubes between 10n and 10n+9 (inclusive).

%e a(0) = 3 since between 0 and 9 there are 3 cubes {0,1,8}.

%t f3[n_] := If[n < 0, 0, Floor[n^(1/3)] + 1]; Table[f3[10n + 9] - f3[10n - 1], {n, 0, 120}] (* _Ray Chandler_, Oct 07 2005 *)

%Y Cf. A110916, A111037.

%K nonn

%O 0,1

%A _Giovanni Teofilatto_, Oct 05 2005

%E Corrected and extended by _Ray Chandler_, Oct 07 2005