0,1

Table of n, a(n) for n=0..104.

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

f3[n_] := If[n < 0, 0, Floor[n^(1/3)] + 1]; Table[f3[10n + 9] - f3[10n - 1], {n, 0, 120}] (*Chandler*)

Cf. A110916, A111037.

Sequence in context: A180515 A009138 A175562 * A271620 A098018 A260073

Adjacent sequences: A111022 A111023 A111024 * A111026 A111027 A111028

nonn

Giovanni Teofilatto, Oct 05 2005

Corrected and extended by Ray Chandler, Oct 07 2005

approved