1,6

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

Index entries for sequences related to partitions

a(n) = Sum_{i=1..floor(n/2)} [omega(i) = omega(n-i)], where [] is the Iverson bracket and omega is the number of distinct prime factors of n (A001221).

Table[Sum[KroneckerDelta[PrimeNu[i], PrimeNu[n - i]], {i, Floor[n/2]}], {n, 100}]

Cf. A001221, A333708 (distinct numbers).

Sequence in context: A024366 A218123 A288157 * A140682 A049317 A134544

Adjacent sequences: A333698 A333699 A333700 * A333702 A333703 A333704

nonn,easy

Wesley Ivan Hurt, Apr 02 2020

approved