1,5

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

Index entries for sequences related to partitions

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

a(n) = floor(n/2) - A062602(n).

Table[Sum[KroneckerDelta[(PrimePi[k] - PrimePi[k - 1]), (PrimePi[n - k] - PrimePi[n - 1 - k])], {k, Floor[n/2]}], {n, 80}]

Cf. A010051, A062602.

Sequence in context: A322141 A029170 A079526 * A163822 A029203 A159805

Adjacent sequences: A291705 A291706 A291707 * A291709 A291710 A291711

nonn,easy

Wesley Ivan Hurt, Oct 20 2017

approved