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