OFFSET
1,7
FORMULA
a(n) = Sum_{k=1..floor(n/2)} mu(k*(n-k))^2, where mu is the Möbius function (A008683).
EXAMPLE
a(13) = 3; The partitions of 13 into two positive integer parts (s,t) where s <= t are (1,12), (2,11), (3,10), (4,9), (5,8), (6,7). The corresponding products are 1*12, 2*11, 3*10, 4*9, 5*8, and 6*7; 3 of which are squarefree.
MATHEMATICA
Table[Sum[MoebiusMu[k (n - k)]^2, {k, Floor[n/2]}], {n, 100}]
CROSSREFS
KEYWORD
nonn
AUTHOR
Wesley Ivan Hurt, Jun 08 2021
STATUS
approved