|
%I #12 Jun 20 2019 04:21:24
%S 0,0,0,0,0,0,0,8,9,10,11,12,13,14,15,32,34,54,57,60,63,66,69,96,100,
%T 104,108,112,116,120,124,160,165,170,175,216,222,228,234,280,287,294,
%U 301,308,315,322,329,384,392,450,459,468,477,540,550,616,627,638
%N Sum of the parts in the partitions of n into two parts with smaller part nonsquarefree.
%H <a href="/index/Par#part">Index entries for sequences related to partitions</a>
%F a(n) = n * Sum_{i=1..n} (1 - mu(i)^2), where mu is the Möbius function (A008683).
%t Table[n*Sum[(1 - MoebiusMu[k]^2), {k, Floor[n/2]}], {n, 80}]
%Y Cf. A008683, A008966, A294239.
%K nonn,easy
%O 1,8
%A _Wesley Ivan Hurt_, Oct 25 2017
|
