OFFSET
1,5
FORMULA
MATHEMATICA
Table[Sum[Mod[n, k]^2, {k, n}], {n, 55}]
PROG
(Python)
def A396283(n):
c, j = n**3, 1
while j <= n:
k = n//j
m = n//k
c += k**2*((a:=m*(m+1))*(2*m+1)-(b:=(j-1)*j)*(2*j-1))//6-n*k*(a-b)
j = m+1
return c # Chai Wah Wu, May 21 2026
CROSSREFS
KEYWORD
nonn
AUTHOR
Ilya Gutkovskiy, May 21 2026
STATUS
approved
