A227841 Partial sums of A014817.

1, 3, 7, 14, 23, 36, 54, 78, 107, 141, 183, 234, 291, 358, 436, 526, 623, 733, 855, 992, 1141, 1304, 1484, 1682, 1893, 2119, 2365, 2630, 2911, 3214, 3538, 3886, 4251, 4637, 5049, 5488, 5945, 6428, 6940, 7480, 8041, 8631, 9249, 9900, 10579, 11288, 12030

Offset: 1

Author

N. J. A. Sloane, Aug 08 2013

Keywords

• nonn

Crossrefs

Cf. A014817, A227842.

Programs

Mathematica

Accumulate[Table[Sum[Floor[k^2/n],{k,n}],{n,50}]] (* Harvey P. Dale, Sep 27 2023 *)