1,4

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

Index entries for sequences related to partitions

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

a(n) = n - A291564(n).

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

Cf. A010051, A291564.

Sequence in context: A302707 A224714 A089169 * A178151 A087794 A050514

Adjacent sequences: A291560 A291561 A291562 * A291564 A291565 A291566

nonn,easy

Wesley Ivan Hurt, Oct 20 2017

approved