A014813 - OEIS

A014813

a(n) = Sum_{k=0..n} ceiling(k^3/n).

1, 5, 13, 26, 47, 76, 115, 164, 228, 307, 401, 512, 643, 794, 967, 1162, 1385, 1632, 1909, 2214, 2551, 2920, 3323, 3760, 4235, 4751, 5301, 5900, 6539, 7222, 7951, 8724, 9553, 10429, 11357, 12336, 13375, 14468, 15619, 16828, 18101, 19435, 20833, 22296, 23826

(list; graph; refs; listen; history; text; internal format)

OFFSET

1,2

REFERENCES

M. Eichler and D. Zagier, The Theory of Jacobi Forms, Birkhauser, 1985, p. 103.

LINKS

Table of n, a(n) for n=1..45.

MAPLE

f := m->add( ceil(nu^3/m), nu=0..m): seq(f(m), m=1..45);

MATHEMATICA

Table[Sum[Ceiling[k^3/n], {k, 0, n}], {n, 50}] (* Harvey P. Dale, May 05 2019 *)

PROG