A026930 Number of partitions of n into an even number of parts, the greatest being 6; also, a(n+11) = number of partitions of n+5 into an odd number of parts, each <=6.
0, 0, 0, 0, 0, 0, 1, 1, 2, 2, 4, 5, 7, 9, 14, 17, 23, 28, 37, 44, 56, 66, 83, 98, 119, 139, 168, 194, 229, 263, 309, 352, 408, 462, 532, 600, 683, 766, 869, 969, 1090, 1211, 1356, 1500, 1670, 1840, 2041, 2242, 2473, 2707, 2978, 3249
Offset: 1
Keywords
Crossrefs
6th column of A026921.
Programs
-
Mathematica
Table[Count[IntegerPartitions[n],?(EvenQ[Length[#]]&&#[[1]]==6&)],{n,60}] (* _Harvey P. Dale, May 04 2025 *)