A294246 Sum of the smaller parts of the partitions of 2n into two parts with smaller part nonsquarefree.
0, 0, 0, 4, 4, 4, 4, 12, 21, 21, 21, 33, 33, 33, 33, 49, 49, 67, 67, 87, 87, 87, 87, 111, 136, 136, 163, 191, 191, 191, 191, 223, 223, 223, 223, 259, 259, 259, 259, 299, 299, 299, 299, 343, 388, 388, 388, 436, 485, 535, 535, 587, 587, 641, 641, 697, 697, 697
Offset: 1
Programs
-
Mathematica
Table[Sum[k (1 - MoebiusMu[k]^2), {k, n}], {n, 80}]
Formula
a(n) = Sum_{i=1..n} i * (1 - mu(i)^2), where mu is the Möbius function (A008683).