OFFSET
0,4
FORMULA
a(n)=floor((n+1)*2^(1/3))-floor(n*2^(1/3))
MATHEMATICA
With[{c=Surd[2, 3]}, Differences[Floor[Range[0, 110]c]]] (* Harvey P. Dale, Jan 30 2015 *)
PROG
(PARI) a(n)=floor((n+1)*2^(1/3))-floor(n*2^(1/3))
CROSSREFS
KEYWORD
nonn
AUTHOR
Benoit Cloitre, Apr 16 2003
STATUS
approved