OFFSET
1,2
EXAMPLE
a(6) = 6 * Sum_{d|6} floor(sqrt(d)) / d = 6 * (floor(sqrt(1))/1 + floor(sqrt(2))/2 + floor(sqrt(3))/3 + floor(sqrt(6))/6) = 6 * (1 + 1/2 + 1/3 + 2/6) = 13.
MATHEMATICA
Table[n*Sum[Floor[Sqrt[k]] (1 - Ceiling[n/k] + Floor[n/k])/k, {k, n}], {n, 100}]
CROSSREFS
KEYWORD
nonn
AUTHOR
Wesley Ivan Hurt, May 31 2021
STATUS
approved