A325347 Number of partitions of n having an integer median.

1, 2, 2, 5, 5, 10, 11, 21, 23, 37, 45, 69, 83, 118, 145, 203, 250, 334, 415, 546, 673, 868, 1074, 1369, 1681, 2113, 2590, 3230, 3942, 4867, 5920, 7265, 8791, 10713, 12923, 15664, 18818, 22685, 27156, 32595, 38879, 46452, 55231, 65741, 77900, 92383, 109153

Offset: 1

Author

Clark Kimberling, Apr 23 2019

Keywords

• nonn

Comments

This sequence and A307683 partition the partition numbers, A000041.

Examples

			a(5) counts these 5 partitions: [5], [3,1,1], [2,2,1], [2,1,1,1], [1,1,1,1,1].
		

Links

• Fausto A. C. Cariboni, Table of n, a(n) for n = 1..180

Crossrefs

Cf. A000041, A307683.

Programs

Mathematica

Table[Count[IntegerPartitions[n], q_ /; IntegerQ[Median[q]]], {n, 10}]