OFFSET
0,2
COMMENTS
LINKS
Vaclav Kotesovec, Table of n, a(n) for n = 0..10000
FORMULA
a(n) ~ 3*n * (log(3*n) + 2*gamma - 11/6), where gamma is the Euler-Mascheroni constant A001620.
MATHEMATICA
Table[Sum[Floor[3*n/k], {k, 1, n}], {n, 0, 100}]
PROG
(PARI) a(n) = sum(k=1, n, floor(3*n/k)); \\ Michel Marcus, Dec 23 2020
CROSSREFS
KEYWORD
nonn
AUTHOR
Vaclav Kotesovec, Dec 23 2020
STATUS
approved