login
Number of partitions of n with even minimal and maximal parts.
4

%I #4 Apr 23 2019 23:58:42

%S 0,1,0,2,0,3,0,5,1,7,2,12,5,17,10,27,18,40,31,62,52,90,83,137,131,199,

%T 201,294,304,425,452,616,665,878,967,1254,1390,1767,1980,2486,2799,

%U 3464,3924,4811,5463,6629,7555,9103,10384,12418

%N Number of partitions of n with even minimal and maximal parts.

%C The four sequences A325338, A325344, A325345, A325346 partition the partition numbers, A000041.

%e a(6) counts these 3 partitions: [6], [4,2], [2,2,2].

%t Table[Count[IntegerPartitions[n], q_ /; EvenQ[Max[q]] && EvenQ[Min[q]]], {n, 30}]

%Y Cf. A000041, A325338, A325344, A325345.

%K nonn,easy

%O 1,4

%A _Clark Kimberling_, Apr 23 2019