A374682
Number of integer compositions of n whose leaders of anti-runs are weakly decreasing.
Original entry on oeis.org
1, 1, 2, 4, 8, 15, 30, 59, 114, 222, 434, 844, 1641, 3189, 6192, 12020, 23320, 45213, 87624, 169744, 328684, 636221, 1231067, 2381269, 4604713, 8901664
Offset: 0
The a(0) = 1 through a(5) = 15 compositions:
() (1) (2) (3) (4) (5)
(11) (12) (13) (14)
(21) (22) (23)
(111) (31) (32)
(112) (41)
(121) (113)
(211) (131)
(1111) (212)
(221)
(311)
(1112)
(1121)
(1211)
(2111)
(11111)
For reversed partitions instead of compositions we have
A115029.
Other types of runs (instead of anti-):
- For leaders of identical runs we have
A000041.
- For leaders of weakly increasing runs we have
A189076, complement
A374636.
- For leaders of weakly decreasing runs we have
A374747.
- For leaders of strictly decreasing runs we have
A374765.
- For leaders of strictly increasing runs we have
A374697.
Other types of run-leaders (instead of weakly decreasing):
- For weakly increasing leaders we have
A374681.
- For strictly increasing leaders we have
A374679.
- For strictly decreasing leaders we have
A374680.
A106356 counts compositions by number of maximal anti-runs.
A238279 counts compositions by number of maximal runs
A238424 counts partitions whose first differences are an anti-run.
-
Table[Length[Select[Join@@Permutations /@ IntegerPartitions[n],GreaterEqual@@First/@Split[#,UnsameQ]&]],{n,0,15}]
A374746
Number of integer compositions of n whose leaders of weakly decreasing runs are strictly decreasing.
Original entry on oeis.org
1, 1, 2, 3, 5, 7, 12, 18, 31, 51, 86, 143, 241, 397, 657, 1082, 1771, 2889, 4697, 7605, 12269, 19720, 31580, 50412, 80205, 127208, 201149, 317171, 498717, 782076, 1223230, 1908381, 2969950, 4610949, 7141972, 11037276, 17019617, 26188490, 40213388, 61624824
Offset: 0
The a(0) = 1 through a(7) = 18 compositions:
() (1) (2) (3) (4) (5) (6) (7)
(11) (21) (22) (32) (33) (43)
(111) (31) (41) (42) (52)
(211) (221) (51) (61)
(1111) (311) (222) (322)
(2111) (312) (331)
(11111) (321) (412)
(411) (421)
(2211) (511)
(3111) (2221)
(21111) (3112)
(111111) (3121)
(3211)
(4111)
(22111)
(31111)
(211111)
(1111111)
Ranked by positions of strictly decreasing rows in
A374740, opp.
A374629.
Types of runs (instead of weakly decreasing):
- For leaders of identical runs we have
A000041.
- For leaders of weakly increasing runs we have
A188920.
- For leaders of anti-runs we have
A374680.
- For leaders of strictly increasing runs we have
A374689.
- For leaders of strictly decreasing runs we have
A374763.
Types of run-leaders (instead of strictly decreasing):
- For weakly increasing leaders we appear to have
A188900.
- For identical leaders we have
A374742.
- For strictly increasing leaders we have opposite
A374634.
- For weakly decreasing leaders we have
A374747.
A335456 counts patterns matched by compositions.
A374748 counts compositions by sum of leaders of weakly decreasing runs.
Cf.
A000009,
A003242,
A106356,
A189076,
A238343,
A261982,
A333213,
A358836,
A374632,
A374635,
A374741.
-
Table[Length[Select[Join@@Permutations /@ IntegerPartitions[n],Greater@@First/@Split[#,GreaterEqual]&]],{n,0,15}]
-
seq(n)={my(A=O(x*x^n), p=1+A, q=p, r=p); for(k=1, n\2, r += x^k*q/(1-x^k); p /= 1 - x^k; q *= (1 - x^k/(1-x^k) + x^k*p)/(1-x^k) ); Vec(r + x^(n\2+1)*q/(1-x))} \\ Andrew Howroyd, Dec 30 2024
A374747
Number of integer compositions of n whose leaders of weakly decreasing runs are themselves weakly decreasing.
Original entry on oeis.org
1, 1, 2, 3, 5, 8, 14, 24, 43, 76, 136, 242, 431, 764, 1353, 2387, 4202, 7376, 12918, 22567, 39338, 68421, 118765, 205743, 355756, 614038, 1058023, 1820029, 3125916, 5360659, 9179700, 15697559, 26807303, 45720739, 77881393, 132505599, 225182047, 382252310, 648187055
Offset: 0
The composition y = (3,2,1,2,2,1,2,5,1,1,1) has weakly decreasing runs ((3,2,1),(2,2,1),(2),(5,1,1,1)), with leaders (3,2,2,5), which are not weakly decreasing, so y is not counted under a(21).
The a(0) = 1 through a(6) = 14 compositions:
() (1) (2) (3) (4) (5) (6)
(11) (21) (22) (32) (33)
(111) (31) (41) (42)
(211) (212) (51)
(1111) (221) (222)
(311) (312)
(2111) (321)
(11111) (411)
(2112)
(2121)
(2211)
(3111)
(21111)
(111111)
Ranked by positions of weakly decreasing rows in
A374740, opposite
A374629.
Types of runs (instead of weakly decreasing):
- For leaders of identical runs we have
A000041.
- For leaders of weakly increasing runs we appear to have
A189076.
- For leaders of anti-runs we have
A374682.
- For leaders of strictly increasing runs we have
A374697.
- For leaders of strictly decreasing runs we have
A374765.
Types of run-leaders (instead of weakly decreasing):
- For weakly increasing leaders we appear to have
A188900.
- For strictly increasing leaders we have opposite
A374634.
- For strictly decreasing leaders we have
A374746.
A124765 counts weakly decreasing runs in standard compositions.
A335456 counts patterns matched by compositions.
A374748 counts compositions by sum of leaders of weakly decreasing runs.
Cf.
A000009,
A003242,
A106356,
A188920,
A238343,
A261982,
A333213,
A374630,
A374635,
A374636,
A374741.
-
Table[Length[Select[Join@@Permutations /@ IntegerPartitions[n],GreaterEqual@@First/@Split[#,GreaterEqual]&]],{n,0,15}]
-
dfs(m, r, u) = 1 + sum(s=r+1, min(m, u), x^s/(1-x^s) + sum(t=1, min(s-1, m-s), dfs(m-s-t, t, s)*x^(s+t)/prod(i=t, s, 1-x^i)));
lista(nn) = Vec(dfs(nn, 0, nn) + O(x^(1+nn))); \\ Jinyuan Wang, Feb 14 2025
A374763
Number of integer compositions of n whose leaders of strictly decreasing runs are themselves strictly decreasing.
Original entry on oeis.org
1, 1, 1, 2, 3, 4, 6, 10, 15, 22, 32, 47, 71, 106, 156, 227, 328, 473, 683, 986, 1421, 2040, 2916, 4149, 5882, 8314, 11727, 16515, 23221, 32593, 45655, 63810, 88979, 123789, 171838, 238055, 329187, 454451, 626412, 862164, 1184917, 1626124, 2228324, 3048982, 4165640, 5682847
Offset: 0
The composition (3,1,2,1,1) has strictly decreasing runs ((3,1),(2,1),(1)), with leaders (3,2,1), so is counted under a(8).
The a(0) = 1 through a(8) = 15 compositions:
() (1) (2) (3) (4) (5) (6) (7) (8)
(21) (31) (32) (42) (43) (53)
(211) (41) (51) (52) (62)
(311) (312) (61) (71)
(321) (322) (413)
(411) (412) (422)
(421) (431)
(511) (512)
(3121) (521)
(3211) (611)
(3212)
(3221)
(4121)
(4211)
(31211)
For partitions instead of compositions we have
A375133.
Other types of runs (instead of strictly decreasing):
- For leaders of identical runs we have
A000041.
- For leaders of weakly increasing runs we appear to have
A188920.
- For leaders of anti-runs we have
A374680.
- For leaders of strictly increasing runs we have
A374689.
- For leaders of weakly decreasing runs we have
A374746.
Other types of run-leaders (instead of strictly decreasing):
- For strictly increasing leaders we have
A374762.
- For weakly increasing leaders we have
A374764.
- For weakly decreasing leaders we have
A374765.
Cf.
A000009,
A106356,
A188900,
A238343,
A261982,
A333213,
A374518,
A374632,
A374635,
A374687,
A374742,
A374743.
-
Table[Length[Select[Join@@Permutations /@ IntegerPartitions[n],Greater@@First/@Split[#,Greater]&]],{n,0,15}]
-
seq(n)={ my(A=O(x*x^n), p=1+A, q=p, r=p); for(k=1, n\2, r += x^k*q; p *= 1 + x^k; q *= 1 + x^k*p); Vec(r + x^(n\2+1)*q/(1-x)) } \\ Andrew Howroyd, Dec 30 2024
A374764
Number of integer compositions of n whose leaders of strictly decreasing runs are weakly increasing.
Original entry on oeis.org
1, 1, 2, 4, 7, 13, 23, 40, 69, 118, 199, 333, 553, 911, 1492, 2428, 3928, 6323, 10129, 16151, 25646, 40560, 63905, 100332, 156995, 244877, 380803, 590479, 913100, 1408309, 2166671, 3325445, 5092283, 7780751, 11863546, 18052080, 27415291, 41556849, 62879053, 94975305, 143213145
Offset: 0
The composition (1,1,2,1) has strictly decreasing runs ((1),(1),(2,1)) with leaders (1,1,2) so is counted under a(5).
The composition (1,2,1,1) has strictly decreasing runs ((1),(2,1),(1)) with leaders (1,2,1) so is not counted under a(5).
The a(0) = 1 through a(5) = 13 compositions:
() (1) (2) (3) (4) (5)
(11) (12) (13) (14)
(21) (22) (23)
(111) (31) (32)
(112) (41)
(121) (113)
(1111) (122)
(131)
(212)
(221)
(1112)
(1121)
(11111)
For partitions instead of compositions we have
A034296.
For strictly increasing leaders we have
A374688.
Other types of runs (instead of strictly decreasing):
- For leaders of identical runs we have
A000041.
- For leaders of anti-runs we have
A374681.
- For leaders of weakly increasing runs we have
A374635.
- For leaders of strictly increasing runs we have
A374690.
- For leaders of weakly decreasing runs we have
A188900.
Other types of run-leaders (instead of weakly increasing):
- For strictly increasing leaders we have
A374762.
- For weakly decreasing leaders we have
A374765.
- For strictly decreasing leaders we have
A374763.
Cf.
A106356,
A188920,
A238343,
A261982,
A333213,
A374687,
A374679,
A374680,
A374742,
A374743,
A374747.
-
Table[Length[Select[Join@@Permutations /@ IntegerPartitions[n],LessEqual@@First/@Split[#,Greater]&]],{n,0,15}]
-
seq(n) = Vec(1/prod(k=1, n, 1 - x^k*prod(j=1, min(n-k,k-1), 1 + x^j, 1 + O(x^(n-k+1))))) \\ Andrew Howroyd, Jul 31 2024
A375137
Numbers k such that the k-th composition in standard order (row k of A066099) matches the dashed pattern 1-32.
Original entry on oeis.org
50, 98, 101, 114, 178, 194, 196, 197, 202, 203, 210, 226, 229, 242, 306, 324, 354, 357, 370, 386, 388, 389, 393, 394, 395, 402, 404, 405, 406, 407, 418, 421, 434, 450, 452, 453, 458, 459, 466, 482, 485, 498, 562, 610, 613, 626, 644, 649, 690, 706, 708, 709
Offset: 1
Composition 102 is (1,3,1,2), which matches 1-3-2 but not 1-32.
Composition 210 is (1,2,3,2), which matches 1-32 but not 132.
Composition 358 is (2,1,3,1,2), which matches 2-3-1 and 1-3-2 but not 23-1 or 1-32.
The terms together with corresponding compositions begin:
50: (1,3,2)
98: (1,4,2)
101: (1,3,2,1)
114: (1,1,3,2)
178: (2,1,3,2)
194: (1,5,2)
196: (1,4,3)
197: (1,4,2,1)
202: (1,3,2,2)
203: (1,3,2,1,1)
210: (1,2,3,2)
226: (1,1,4,2)
229: (1,1,3,2,1)
242: (1,1,1,3,2)
The complement is too dense, but counted by
A189076.
Compositions of this type are counted by
A374636.
For leaders of strictly increasing runs we have
A375139, counted by
A375135.
All of the following pertain to compositions in standard order:
- Constant compositions are
A272919.
Cf.
A056823,
A106356,
A188919,
A238343,
A333213,
A373948,
A373953,
A374634,
A374635,
A374637,
A375123,
A375296.
-
stc[n_]:=Differences[Prepend[Join @@ Position[Reverse[IntegerDigits[n,2]],1],0]]//Reverse;
Select[Range[0,100],MatchQ[stc[#],{_,x_,_,z_,y_,_}/;x
A374690
Number of integer compositions of n whose leaders of strictly increasing runs are weakly increasing.
Original entry on oeis.org
1, 1, 2, 3, 6, 10, 19, 34, 63, 115, 211, 387, 710, 1302, 2385, 4372, 8009, 14671, 26867, 49196, 90069, 164884, 301812, 552406, 1011004, 1850209, 3385861, 6195832, 11337470, 20745337, 37959030, 69454669, 127081111, 232517129, 425426211, 778376479, 1424137721
Offset: 0
The composition (1,1,3,2,3,2) has strictly increasing runs ((1),(1,3),(2,3),(2)), with leaders (1,1,2,2), so is counted under a(12).
The a(0) = 1 through a(6) = 19 compositions:
() (1) (2) (3) (4) (5) (6)
(11) (12) (13) (14) (15)
(111) (22) (23) (24)
(112) (113) (33)
(121) (122) (114)
(1111) (131) (123)
(1112) (132)
(1121) (141)
(1211) (222)
(11111) (1113)
(1122)
(1131)
(1212)
(1311)
(11112)
(11121)
(11211)
(12111)
(111111)
Ranked by positions of weakly increasing rows in
A374683.
Types of runs (instead of strictly increasing):
- For leaders of identical runs we have
A000041.
- For leaders of anti-runs we have
A374681.
- For leaders of weakly increasing runs we have
A374635.
- For leaders of weakly decreasing runs we have
A188900.
- For leaders of strictly decreasing runs we have
A374764.
Types of run-leaders (instead of weakly increasing):
- For strictly increasing leaders we have
A374688.
- For strictly decreasing leaders we have
A374689.
- For weakly decreasing leaders we have
A374697.
A335456 counts patterns matched by compositions.
A374700 counts compositions by sum of leaders of strictly increasing runs.
Cf.
A000009,
A106356,
A188920,
A189076,
A238343,
A261982,
A333213,
A374629,
A374630,
A374632,
A374679.
-
Table[Length[Select[Join@@Permutations /@ IntegerPartitions[n],LessEqual@@First/@Split[#,Less]&]],{n,0,15}]
A374765
Number of integer compositions of n whose leaders of strictly decreasing runs are weakly decreasing.
Original entry on oeis.org
1, 1, 2, 3, 5, 8, 13, 21, 34, 55, 88, 141, 225, 357, 565, 891, 1399, 2191, 3420, 5321, 8256, 12774, 19711, 30339, 46584, 71359, 109066, 166340, 253163, 384539, 582972, 882166, 1332538, 2009377, 3024969, 4546562, 6822926, 10223632, 15297051, 22855872, 34103117
Offset: 0
The composition (3,1,2,2,1) has strictly decreasing runs ((3,1),(2),(2,1)), with leaders (3,2,2), so is counted under a(9).
The a(0) = 1 through a(6) = 13 compositions:
() (1) (2) (3) (4) (5) (6)
(11) (21) (22) (32) (33)
(111) (31) (41) (42)
(211) (212) (51)
(1111) (221) (222)
(311) (312)
(2111) (321)
(11111) (411)
(2121)
(2211)
(3111)
(21111)
(111111)
Other types of runs (instead of strictly decreasing):
- For leaders of identical runs we have
A000041.
- For leaders of weakly increasing runs we appear to have
A189076.
- For leaders of anti-runs we have
A374682.
- For leaders of strictly increasing runs we have
A374697.
- For leaders of weakly decreasing runs we have
A374747.
Other types of run-leaders (instead of weakly decreasing):
- For strictly increasing leaders we have
A374762.
- For strictly decreasing leaders we have
A374763.
- For weakly increasing leaders we have
A374764.
Cf.
A106356,
A188900,
A188920,
A238343,
A261982,
A333213,
A374635,
A374636,
A374689,
A374742,
A374743,
A375133.
-
Table[Length[Select[Join@@Permutations /@ IntegerPartitions[n],GreaterEqual@@First/@Split[#,Greater]&]],{n,0,15}]
-
dfs(m, r, u) = 1 + sum(s=r, min(m, u), dfs(m-s, s, s)*x^s + sum(t=1, min(s-1, m-s), dfs(m-s-t, t, s)*x^(s+t)*prod(i=t+1, s-1, 1+x^i)));
lista(nn) = Vec(dfs(nn, 1, nn) + O(x^(1+nn))); \\ Jinyuan Wang, Feb 13 2025
A375140
Number of integer compositions of n whose leaders of weakly increasing runs are not strictly decreasing.
Original entry on oeis.org
0, 0, 0, 1, 3, 10, 26, 65, 151, 343, 750, 1614, 3410, 7123, 14724, 30220, 61639, 125166, 253233, 510936, 1028659, 2067620, 4150699, 8324552, 16683501, 33417933, 66910805, 133931495, 268023257, 536279457, 1072895973, 2146277961, 4293254010, 8587507415
Offset: 1
The a(1) = 0 through a(6) = 10 compositions:
. . . (121) (131) (132)
(1121) (141)
(1211) (1131)
(1212)
(1221)
(1311)
(2121)
(11121)
(11211)
(12111)
For leaders of identical runs we have
A056823.
The complement is counted by
A188920.
For leaders of weakly decreasing runs we have the complement of
A374746.
A106356 counts compositions by number of maximal anti-runs.
A238424 counts partitions whose first differences are an anti-run.
A335456 counts patterns matched by compositions.
A374637 counts compositions by sum of leaders of weakly increasing runs.
-
Table[Length[Select[Join@@Permutations /@ IntegerPartitions[n],!Greater@@First/@Split[#,LessEqual]&]],{n,15}]
- or -
Table[Length[Select[Join@@Permutations/@IntegerPartitions[n],MatchQ[#,{_,x_,_,z_,y_,_}/;x<=y
A374699
Number of integer compositions of n whose leaders of maximal anti-runs are not weakly decreasing.
Original entry on oeis.org
0, 0, 0, 0, 0, 1, 2, 5, 14, 34, 78, 180, 407, 907, 2000, 4364, 9448, 20323, 43448, 92400, 195604, 412355, 866085, 1813035, 3783895, 7875552
Offset: 0
The a(0) = 0 through a(8) = 14 compositions:
. . . . . (122) (1122) (133) (233)
(1221) (1222) (1133)
(11122) (1223)
(11221) (1322)
(12211) (1331)
(11222)
(12122)
(12212)
(12221)
(21122)
(111122)
(111221)
(112211)
(122111)
The complement is counted by
A374682.
Other types of runs (instead of anti-):
- For leaders of identical runs we have
A056823.
- For leaders of weakly increasing runs we have
A374636, complement
A189076?
- For leaders of strictly increasing runs:
A375135, complement
A374697.
Other types of run-leaders (instead of weakly decreasing):
- For weakly increasing leaders we have complement
A374681.
- For strictly increasing leaders we have complement complement
A374679.
- For strictly decreasing leaders we have complement
A374680.
A106356 counts compositions by number of maximal anti-runs.
A238279 counts compositions by number of maximal runs
A238424 counts partitions whose first differences are an anti-run.
A333381 counts maximal anti-runs in standard compositions.
-
Table[Length[Select[Join@@Permutations /@ IntegerPartitions[n],!GreaterEqual@@First/@Split[#,UnsameQ]&]],{n,0,15}]
Comments