OFFSET
1,3
FORMULA
a(n) = Sum_{i=1..floor((n-1)/2)} i * (n-i) * (n-2*i) * (floor((n-i)/i) - floor((n-i-1)/i)).
MATHEMATICA
Table[Sum[i (n - i) (n - 2 i) (Floor[(n - i)/i] - Floor[(n - i - 1)/i]), {i, Floor[(n - 1)/2]}], {n, 50}]
CROSSREFS
KEYWORD
nonn,easy,changed
AUTHOR
Wesley Ivan Hurt, Apr 24 2018
STATUS
approved