OFFSET
1,2
FORMULA
a(n) ~ zeta(3) * n^3. - Vaclav Kotesovec, May 28 2021
MATHEMATICA
Total/@Table[Floor[n/k Floor[n/k Floor[n/k]]], {n, 50}, {k, n}] (* Harvey P. Dale, May 14 2013 *)
Table[Sum[Floor[n / k Floor[n / k Floor[n / k]]], {k, 1, n}], {n, 1, 50}] (* Vincenzo Librandi, Jul 28 2019 *)
PROG
(PARI) a(n) = sum(k=1, n, floor((n/k)*floor((n/k)*floor(n/k)))) \\ Michel Marcus, Mar 23 2013
(Magma) [&+[((n div k)*((n div k)*(n div k))): k in [1..n]]: n in [1..50]]; // Vincenzo Librandi, Jul 28 2019
CROSSREFS
KEYWORD
nonn
AUTHOR
STATUS
approved