OFFSET
0,14
EXAMPLE
The a(n) strict partitions for selected n:
n = 3 13 15 18 20 22
------------------------------------------------------------------
(2,1) (6,5,2) (10,5) (12,6) (12,7,1) (12,8,2)
(6,4,2,1) (6,4,3,2) (8,7,3) (8,5,4,3) (8,6,5,3)
(6,5,3,1) (8,5,3,2) (8,6,4,2) (8,7,5,2)
(8,6,3,1) (8,7,4,1) (12,7,2,1)
(8,6,3,2,1) (8,6,4,3,1)
(8,7,4,2,1)
MATHEMATICA
conj[y_]:=If[Length[y]==0, y, Table[Length[Select[y, #>=k&]], {k, 1, Max[y]}]];
Table[Length[Select[IntegerPartitions[n], UnsameQ@@#&&Count[conj[#], _?OddQ]==Count[conj[#], _?EvenQ]&]], {n, 0, 30}]
CROSSREFS
There are four statistics:
There are four other pairings of statistics:
There are three double-pairings of statistics:
KEYWORD
nonn
AUTHOR
Gus Wiseman, Mar 15 2022
STATUS
approved