OFFSET
0,4
COMMENTS
a(n)=0 iff n is a square.
FORMULA
a(n) = ceiling(n^(3/2))^2 - n^3 = A077115(n) - n^3.
EXAMPLE
A077115(10) = 1024 = 32^2 is the least square >= 10^3 = 1000, therefore a(10) = 1024 - 1000 = 24.
MATHEMATICA
f[n_]=Ceiling[n^(3/2)]^2-n^3;
t1=Table[f[n], {n, 1, 90}]; t1 (* Clark Kimberling, Jan 30 2011 *)
PROG
(PARI) for(n=1, 100, print1(ceil(n^(3/2))^2-n^3, ", "))
CROSSREFS
KEYWORD
easy,nonn
AUTHOR
Benoit Cloitre, May 20 2002
STATUS
approved