1,9

Table of n, a(n) for n=1..76.

Index entries for sequences related to partitions

a(n) = floor(n/2) - Sum_{i=1..floor(n/2)} [A008966(i) = A008966(n-i)], where [] is the Iverson bracket.

Table[Floor[n/2] - Sum[KroneckerDelta[MoebiusMu[k]^2, MoebiusMu[n - k]^2], {k, Floor[n/2]}], {n, 80}]

Cf. A008966, A294100.

Sequence in context: A106589 A335490 A334290 * A051911 A106595 A181608

Adjacent sequences: A294098 A294099 A294100 * A294102 A294103 A294104

nonn,easy

Wesley Ivan Hurt, Oct 22 2017

approved