A344649 Triangle read by rows where T(n,k) is the number of strict integer partitions of 2n with reverse-alternating sum 2k.
1, 0, 1, 0, 0, 1, 0, 1, 0, 1, 0, 1, 1, 0, 1, 0, 1, 2, 1, 0, 1, 0, 1, 3, 2, 1, 0, 1, 0, 1, 3, 3, 2, 1, 0, 1, 0, 1, 4, 4, 3, 2, 1, 0, 1, 0, 1, 5, 6, 4, 3, 2, 1, 0, 1, 0, 1, 7, 7, 6, 4, 3, 2, 1, 0, 1, 0, 1, 8, 10, 8, 6, 4, 3, 2, 1, 0, 1
Offset: 0
Examples
Triangle begins: 1 0 1 0 0 1 0 1 0 1 0 1 1 0 1 0 1 2 1 0 1 0 1 3 2 1 0 1 0 1 3 3 2 1 0 1 0 1 4 4 3 2 1 0 1 0 1 5 6 4 3 2 1 0 1 0 1 7 7 6 4 3 2 1 0 1 0 1 8 10 8 6 4 3 2 1 0 1 0 1 10 13 12 8 6 4 3 2 1 0 1 0 1 11 18 15 12 8 6 4 3 2 1 0 1 0 1 14 22 21 16 12 8 6 4 3 2 1 0 1 0 1 15 29 27 23 16 12 8 6 4 3 2 1 0 1 Row n = 8 counts the following partitions (empty columns indicated by dots): . (8,7,1) (7,6,3) (7,5,4) (9,4,3) (11,3,2) (13,2,1) . (16) (8,6,2) (8,5,3) (10,4,2) (12,3,1) (9,6,1) (9,5,2) (11,4,1) (6,4,3,2,1) (10,5,1) Row n = 9 counts the following partitions (empty columns indicated by dots, A..I = 10..18): . 981 873 765 954 B43 D32 F21 . I 972 864 A53 C42 E31 A71 963 B52 D41 65421 A62 C51 75321 B61 84321
Crossrefs
The non-reversed version is A152146.
The non-reversed non-strict version is A239830.
Column k = 2 is A343941.
The non-strict version is A344610.
Row sums are A344650.
Right half of even-indexed rows of A344739.
A067659 counts strict partitions of odd length.
A120452 counts partitions of 2n with reverse-alternating sum 2.
A344604 counts wiggly compositions with twins.
A344611 counts partitions of 2n with reverse-alternating sum >= 0.
A344741 counts partitions of 2n with reverse-alternating sum -2.
Programs
-
Mathematica
sats[y_]:=Sum[(-1)^(i-Length[y])*y[[i]],{i,Length[y]}]; Table[Length[Select[IntegerPartitions[n],UnsameQ@@#&&sats[#]==k&]],{n,0,30,2},{k,0,n,2}]
Comments