OFFSET
1,5
FORMULA
a(n) = Sum_{k=1..n} k * c(k) * (ceiling(n/k) - floor(n/k)), where c = A064911.
MATHEMATICA
Table[Sum[k*KroneckerDelta[PrimeOmega[k], 2] (Ceiling[n/k] - Floor[n/k]), {k, n}], {n, 100}]
CROSSREFS
KEYWORD
nonn,easy
AUTHOR
Wesley Ivan Hurt, Jan 16 2024
STATUS
approved