A100204 Numbers of cubes in the range [n^2, (n+1)^2].

2, 1, 1, 0, 0, 1, 0, 1, 1, 0, 0, 1, 0, 0, 1, 0, 0, 0, 1, 0, 0, 0, 1, 0, 0, 0, 1, 1, 0, 0, 0, 1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 1, 1, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 1, 0

Offset

0,1

Links

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

Mathematica

Table[ Floor[(n + 1)^(2/3)] - Ceiling[n^(2/3)] + 1, {n, 0, 120}] (* Ray Chandler, Jan 09 2005 *)

Crossrefs

Sequence in context: A328712 A319368 A092410 * A073779 A081227 A301469

Adjacent sequences: A100201 A100202 A100203 * A100205 A100206 A100207

Keyword

easy,nonn

Author

Giovanni Teofilatto, Dec 28 2004

Extensions

Corrected and extended by Ray Chandler, Jan 09 2005

Status

approved