A374632
Number of integer compositions of n whose leaders of weakly increasing runs are distinct.
Original entry on oeis.org
1, 1, 2, 4, 7, 13, 23, 40, 69, 119, 200, 335, 557, 917, 1499, 2433, 3920, 6280, 10004, 15837, 24946, 39087, 60952, 94606, 146203, 224957, 344748, 526239, 800251, 1212527, 1830820, 2754993, 4132192, 6178290, 9209308, 13686754, 20282733, 29973869, 44175908, 64936361
Offset: 0
The composition (4,2,2,1,1,3) has weakly increasing runs ((4),(2,2),(1,1,3)), with leaders (4,2,1), so is counted under a(13).
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)
(211) (113)
(1111) (122)
(212)
(221)
(311)
(1112)
(2111)
(11111)
Types of runs (instead of weakly increasing):
- For leaders of strictly increasing runs we have
A374687, ranks
A374698.
- For leaders of weakly decreasing runs we have
A374743, ranks
A335467.
- For leaders of strictly decreasing runs we have
A374761, ranks
A374767.
Types of run-leaders (instead of distinct):
- For strictly decreasing leaders we appear to have
A188920.
- For weakly decreasing leaders we appear to have
A189076.
- For identical leaders we have
A374631.
- For weakly increasing leaders we have
A374635.
- For strictly increasing leaders we have
A374634.
A003242 counts anti-run compositions.
A335456 counts patterns matched by compositions.
A374637 counts compositions by sum of leaders of weakly increasing runs.
-
Table[Length[Select[Join@@Permutations /@ IntegerPartitions[n],UnsameQ@@First/@Split[#,LessEqual]&]],{n,0,15}]
-
dfs(m, r, v) = 1 + sum(s=1, min(m, r-1), if(!setsearch(v, s), dfs(m-s, s, setunion(v, [s]))*x^s/(1-x^s) + sum(t=s+1, m-s, dfs(m-s-t, t, setunion(v, [s]))*x^(s+t)/prod(i=s, t, 1-x^i))));
lista(nn) = Vec(dfs(nn, nn+1, []) + O(x^(1+nn))); \\ Jinyuan Wang, Feb 13 2025
A374635
Number of integer compositions of n whose leaders of weakly increasing runs are themselves weakly increasing.
Original entry on oeis.org
1, 1, 2, 3, 6, 10, 20, 36, 69, 130, 247, 467, 890, 1689, 3213, 6110, 11627, 22121, 42101, 80124, 152512, 290300, 552609, 1051953, 2002583, 3812326, 7257679, 13816867, 26304254, 50077792, 95338234, 181505938, 345554234, 657874081, 1252478707, 2384507463, 4539705261
Offset: 0
The composition (1,3,3,2,4,2) has weakly increasing runs ((1,3,3),(2,4),(2)), with leaders (1,2,2), so is counted under a(15).
The a(0) = 1 through a(6) = 20 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)
(1221)
(1311)
(11112)
(11121)
(11211)
(12111)
(111111)
Ranked by positions of weakly increasing rows in
A374629 (sums
A374630).
Types of runs (instead of weakly increasing):
- For leaders of constant runs we have
A000041.
- For leaders of weakly decreasing runs we have
A188900.
- For leaders of anti-runs we have
A374681.
- For leaders of strictly increasing runs we have
A374690.
- For leaders of strictly decreasing runs we have
A374764.
Types of run-leaders (instead of weakly increasing):
- For strictly decreasing leaders we appear to have
A188920.
- For weakly decreasing leaders we appear to have
A189076.
- For identical leaders we have
A374631.
- For strictly increasing leaders we have
A374634.
A003242 counts anti-run compositions.
A335456 counts patterns matched by compositions.
A374637 counts compositions by sum of leaders of weakly increasing runs.
-
Table[Length[Select[Join@@Permutations /@ IntegerPartitions[n],LessEqual@@First/@Split[#,LessEqual]&]],{n,0,15}]
-
dfs(m, r, u) = 1 + sum(s=u, min(m, r-1), x^s/(1-x^s) + sum(t=s+1, m-s, dfs(m-s-t, t, s)*x^(s+t)/prod(i=s, t, 1-x^i)));
lista(nn) = Vec(dfs(nn, nn+1, 1) + O(x^(1+nn))); \\ Jinyuan Wang, Feb 13 2025
A374683
Irregular triangle read by rows where row n lists the leaders of strictly increasing runs in the n-th composition in standard order.
Original entry on oeis.org
1, 2, 1, 1, 3, 2, 1, 1, 1, 1, 1, 4, 3, 1, 2, 2, 2, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 5, 4, 1, 3, 2, 3, 1, 1, 2, 2, 2, 1, 2, 1, 2, 1, 1, 1, 1, 1, 1, 1, 2, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 6, 5, 1, 4, 2, 4, 1, 1, 3, 3, 3, 2, 1, 3, 1, 3, 1, 1, 1
Offset: 0
The maximal strictly increasing subsequences of the 1234567th composition in standard order are ((3),(2),(1,2),(2),(1,2,5),(1),(1),(1)), so row 1234567 is (3,2,1,2,1,1,1,1).
The nonnegative integers, corresponding compositions, and leaders of strictly increasing runs begin:
0: () -> () 15: (1,1,1,1) -> (1,1,1,1)
1: (1) -> (1) 16: (5) -> (5)
2: (2) -> (2) 17: (4,1) -> (4,1)
3: (1,1) -> (1,1) 18: (3,2) -> (3,2)
4: (3) -> (3) 19: (3,1,1) -> (3,1,1)
5: (2,1) -> (2,1) 20: (2,3) -> (2)
6: (1,2) -> (1) 21: (2,2,1) -> (2,2,1)
7: (1,1,1) -> (1,1,1) 22: (2,1,2) -> (2,1)
8: (4) -> (4) 23: (2,1,1,1) -> (2,1,1,1)
9: (3,1) -> (3,1) 24: (1,4) -> (1)
10: (2,2) -> (2,2) 25: (1,3,1) -> (1,1)
11: (2,1,1) -> (2,1,1) 26: (1,2,2) -> (1,2)
12: (1,3) -> (1) 27: (1,2,1,1) -> (1,1,1)
13: (1,2,1) -> (1,1) 28: (1,1,3) -> (1,1)
14: (1,1,2) -> (1,1) 29: (1,1,2,1) -> (1,1,1)
All of the following pertain to compositions in standard order:
- Ranks of non-contiguous compositions are
A374253, counted by
A335548.
-
stc[n_]:=Differences[Prepend[Join @@ Position[Reverse[IntegerDigits[n,2]],1],0]]//Reverse;
Table[First/@Split[stc[n],Less],{n,0,100}]
A374518
Number of integer compositions of n whose leaders of anti-runs are distinct.
Original entry on oeis.org
1, 1, 1, 3, 5, 9, 17, 32, 58, 112, 201, 371, 694, 1276, 2342, 4330, 7958, 14613, 26866, 49303, 90369, 165646, 303342, 555056, 1015069, 1855230
Offset: 0
The a(0) = 1 through a(6) = 17 compositions:
() (1) (2) (3) (4) (5) (6)
(12) (13) (14) (15)
(21) (31) (23) (24)
(121) (32) (42)
(211) (41) (51)
(122) (123)
(131) (132)
(212) (141)
(311) (213)
(231)
(312)
(321)
(411)
(1212)
(1221)
(2112)
(2121)
These compositions have ranks
A374638.
The complement is counted by
A374678.
For partitions instead of compositions we have
A375133.
Other types of runs (instead of anti-):
- For leaders of weakly increasing runs we have
A374632, ranks
A374768.
- For leaders of strictly increasing runs we have
A374687, ranks
A374698.
- For leaders of weakly decreasing runs we have
A374743, ranks
A374701.
- For leaders of strictly decreasing runs we have
A374761, ranks
A374767.
Other types of run-leaders (instead of distinct):
- For identical leaders we have
A374517.
- For weakly increasing leaders we have
A374681.
- For strictly increasing leaders we have
A374679.
- For weakly decreasing leaders we have
A374682.
- 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],UnsameQ@@First/@Split[#,UnsameQ]&]],{n,0,15}]
A374761
Number of integer compositions of n whose leaders of strictly decreasing runs are distinct.
Original entry on oeis.org
1, 1, 1, 3, 5, 7, 13, 27, 45, 73, 117, 205, 365, 631, 1061, 1711, 2777, 4599, 7657, 12855, 21409, 35059, 56721, 91149, 146161, 234981, 379277, 612825, 988781, 1587635, 2533029, 4017951, 6342853, 9985087, 15699577, 24679859, 38803005, 60979839, 95698257, 149836255
Offset: 0
The composition (3,1,4,3,2,1,2,8) has strictly decreasing runs ((3,1),(4,3,2,1),(2),(8)), with leaders (3,4,2,8), so is counted under a(24).
The a(0) = 1 through a(6) = 13 compositions:
() (1) (2) (3) (4) (5) (6)
(12) (13) (14) (15)
(21) (31) (23) (24)
(121) (32) (42)
(211) (41) (51)
(131) (123)
(311) (132)
(141)
(213)
(231)
(312)
(321)
(411)
For identical instead of distinct leaders we have
A374760, ranks
A374759.
For partitions instead of compositions we have
A375133.
Other types of runs:
- For leaders of identical runs we have
A000005 for n > 0, ranks
A272919.
Other types of run-leaders:
- For strictly increasing leaders we have
A374762.
- For strictly decreasing leaders we have
A374763.
- For weakly increasing leaders we have
A374764.
- For weakly decreasing leaders we have
A374765.
A374700 counts compositions by sum of leaders of strictly increasing runs.
Cf.
A034296,
A106356,
A188920,
A189076,
A238343,
A333213,
A374517,
A374631,
A374640,
A374686,
A374742.
-
Table[Length[Select[Join @@ Permutations/@IntegerPartitions[n],UnsameQ@@First/@Split[#,Greater]&]],{n,0,15}]
-
dfs(m, r, v) = 1 + sum(s=r, m, if(!setsearch(v, s), dfs(m-s, s, setunion(v, [s]))*x^s + sum(t=1, min(s-1, m-s), dfs(m-s-t, t, setunion(v, [s]))*x^(s+t)*prod(i=t+1, s-1, 1+x^i))));
lista(nn) = Vec(dfs(nn, 1, []) + O(x^(1+nn))); \\ Jinyuan Wang, Feb 13 2025
A374768
Numbers k such that the leaders of weakly increasing runs in the k-th composition in standard order (A066099) are distinct.
Original entry on oeis.org
0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 14, 15, 16, 17, 18, 19, 20, 21, 22, 23, 24, 26, 28, 30, 31, 32, 33, 34, 35, 36, 37, 38, 39, 40, 41, 42, 43, 44, 46, 47, 48, 50, 52, 56, 58, 60, 62, 63, 64, 65, 66, 67, 68, 69, 70, 71, 72, 73, 74, 75, 76, 78, 79, 80, 81
Offset: 1
The 4444th composition in standard order is (4,2,2,1,1,3), with weakly increasing runs ((4),(2,2),(1,1,3)), with leaders (4,2,1), so 4444 is in the sequence.
These are the positions of strict rows in
A374629 (which has sums
A374630).
Identical instead of distinct leaders are
A374633, counted by
A374631.
For leaders of strictly increasing runs we have
A374698, counted by
A374687.
For leaders of weakly decreasing runs we have
A374701, counted by
A374743.
For leaders of strictly decreasing runs we have
A374767, counted by
A374761.
All of the following pertain to compositions in standard order:
- Ranks of strict compositions are
A233564.
- Ranks of constant compositions are
A272919.
Cf.
A065120,
A188920,
A189076,
A238343,
A333213,
A335449,
A373949,
A274174,
A374249,
A374635,
A374637.
-
stc[n_]:=Differences[Prepend[Join @@ Position[Reverse[IntegerDigits[n,2]],1],0]]//Reverse;
Select[Range[0,166],UnsameQ@@First/@Split[stc[#],LessEqual]&]
A374634
Number of integer compositions of n whose leaders of weakly increasing runs are strictly increasing.
Original entry on oeis.org
1, 1, 2, 3, 5, 7, 12, 17, 28, 43, 67, 103, 162, 245, 374, 569, 854, 1278, 1902, 2816, 4148, 6087, 8881, 12926, 18726, 27042, 38894, 55789, 79733, 113632, 161426, 228696, 323049, 455135, 639479, 896249, 1252905, 1747327, 2431035, 3374603, 4673880, 6459435, 8908173
Offset: 0
The composition (1,3,3,2,4,3) has weakly increasing runs ((1,3,3),(2,4),(3)), with leaders (1,2,3), so is counted under a(16).
The a(0) = 1 through a(7) = 17 compositions:
() (1) (2) (3) (4) (5) (6) (7)
(11) (12) (13) (14) (15) (16)
(111) (22) (23) (24) (25)
(112) (113) (33) (34)
(1111) (122) (114) (115)
(1112) (123) (124)
(11111) (132) (133)
(222) (142)
(1113) (223)
(1122) (1114)
(11112) (1123)
(111111) (1132)
(1222)
(11113)
(11122)
(111112)
(1111111)
Ranked by positions of strictly increasing rows in
A374629 (sums
A374630).
Types of runs (instead of weakly increasing):
- For leaders of constant runs we have
A000041.
- For leaders of anti-runs we have
A374679.
- For leaders of strictly increasing runs we have
A374688.
- For leaders of strictly decreasing runs we have
A374762.
Types of run-leaders (instead of strictly increasing):
- For strictly decreasing leaders we appear to have
A188920.
- For weakly decreasing leaders we appear to have
A189076.
- For identical leaders we have
A374631.
- For weakly increasing leaders we have
A374635.
A003242 counts anti-run compositions.
A335456 counts patterns matched by compositions.
A374637 counts compositions by sum of leaders of weakly increasing runs.
-
Table[Length[Select[Join@@Permutations /@ IntegerPartitions[n],Less@@First/@Split[#,LessEqual]&]],{n,0,15}]
-
dfs(m, r, u) = 1 + sum(s=u+1, min(m, r-1), x^s/(1-x^s) + sum(t=s+1, m-s, dfs(m-s-t, t, s)*x^(s+t)/prod(i=s, t, 1-x^i)));
lista(nn) = Vec(dfs(nn, nn+1, 0) + O(x^(1+nn))); \\ Jinyuan Wang, Feb 13 2025
A374631
Number of integer compositions of n whose leaders of weakly increasing runs are identical.
Original entry on oeis.org
1, 1, 2, 3, 6, 10, 19, 34, 63, 116, 218, 405, 763, 1436, 2714, 5127, 9718, 18422, 34968, 66397, 126168, 239820, 456027, 867325, 1649970, 3139288, 5973746, 11368487, 21636909, 41182648, 78389204, 149216039, 284046349, 540722066, 1029362133, 1959609449
Offset: 0
The composition (1,3,1,4,1,2,2,1) has maximal weakly increasing subsequences ((1,3),(1,4),(1,2,2),(1)), with leaders (1,1,1,1), so is counted under a(15).
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) (141)
(1121) (222)
(1211) (1113)
(11111) (1122)
(1131)
(1212)
(1221)
(1311)
(11112)
(11121)
(11211)
(12111)
(111111)
Types of runs (instead of weakly increasing):
- For leaders of identical runs we have
A000005 for n > 0, ranks
A272919.
- For leaders of strictly increasing runs we have
A374686, ranks
A374685.
- For leaders of weakly decreasing runs we have
A374742, ranks
A374744.
- For leaders of strictly decreasing runs we have
A374760, ranks
A374759.
Types of run-leaders (instead of identical):
- For strictly decreasing leaders we appear to have
A188920.
- For weakly decreasing leaders we appear to have
A189076.
- For strictly increasing leaders we have
A374634.
- For weakly increasing leaders we have
A374635.
A003242 counts anti-run compositions.
A335456 counts patterns matched by compositions.
A374637 counts compositions by sum of leaders of weakly increasing runs.
Cf.
A000009,
A106356,
A124766,
A238343,
A261982,
A333213,
A373949,
A374518,
A374687,
A374743,
A374761.
-
Table[Length[Select[Join@@Permutations /@ IntegerPartitions[n],SameQ@@First/@Split[#,LessEqual]&]],{n,0,15}]
-
C_x(N) = {my(x='x+O('x^N), h=1+sum(i=1,N, 1/(1-x^i)*(x^i+sum(z=1,N-i+1, (x^i/(1-x^i)*(-1+(1/prod(j=i+1,N-i,1-x^j))))^z)))); Vec(h)}
C_x(40) \\ John Tyler Rascoe, Jul 25 2024
A374698
Numbers k such that the leaders of strictly increasing runs in the k-th composition in standard order are distinct.
Original entry on oeis.org
0, 1, 2, 4, 5, 6, 8, 9, 12, 16, 17, 18, 20, 22, 24, 26, 32, 33, 34, 37, 38, 40, 41, 44, 48, 50, 52, 64, 65, 66, 68, 69, 70, 72, 76, 80, 81, 88, 96, 98, 100, 104, 128, 129, 130, 132, 133, 134, 137, 140, 144, 145, 148, 150, 152, 154, 160, 161, 164, 166, 176, 180
Offset: 1
The maximal strictly increasing subsequences of the 212th composition in standard order are ((1,2),(2,3)), with leaders (1,2), so 212 is in the sequence.
The terms together with corresponding compositions begin:
0: ()
1: (1)
2: (2)
4: (3)
5: (2,1)
6: (1,2)
8: (4)
9: (3,1)
12: (1,3)
16: (5)
17: (4,1)
18: (3,2)
20: (2,3)
22: (2,1,2)
24: (1,4)
26: (1,2,2)
Positions of distinct (strict) rows in
A374683.
Compositions of this type are counted by
A374687.
All of the following pertain to compositions in standard order:
-
stc[n_]:=Differences[Prepend[Join @@ Position[Reverse[IntegerDigits[n,2]],1],0]]//Reverse;
Select[Range[0,100],UnsameQ@@First/@Split[stc[#],Less]&]
A374767
Numbers k such that the leaders of strictly decreasing runs in the k-th composition in standard order are distinct.
Original entry on oeis.org
0, 1, 2, 4, 5, 6, 8, 9, 11, 12, 13, 16, 17, 18, 19, 20, 24, 25, 32, 33, 34, 35, 37, 38, 40, 41, 44, 48, 49, 50, 52, 64, 65, 66, 67, 68, 69, 70, 72, 74, 75, 77, 78, 80, 81, 82, 83, 88, 89, 92, 96, 97, 98, 101, 102, 104, 105, 108, 128, 129, 130, 131, 132, 133
Offset: 1
The 10000000th composition in standard order is (3,1,4,3,2,1,2,8), with strictly decreasing runs ((3,1),(4,3,2,1),(2),(8)), with leaders (3,4,2,1) so 10000000 is in the sequence.
The terms together with the corresponding compositions begin:
0: ()
1: (1)
2: (2)
4: (3)
5: (2,1)
6: (1,2)
8: (4)
9: (3,1)
11: (2,1,1)
12: (1,3)
13: (1,2,1)
16: (5)
17: (4,1)
18: (3,2)
19: (3,1,1)
20: (2,3)
24: (1,4)
25: (1,3,1)
For identical instead of distinct runs we have
A374759, counted by
A374760.
Compositions of this type are counted by
A374761.
All of the following pertain to compositions in standard order:
Six types of runs:
Cf.
A065120,
A106356,
A188920,
A233564,
A238343,
A272919,
A333213,
A373949,
A374633,
A374685,
A374744,
A374758,
A375128.
-
stc[n_]:=Differences[Prepend[Join @@ Position[Reverse[IntegerDigits[n,2]],1],0]]//Reverse;
Select[Range[0,100],UnsameQ@@First/@Split[stc[#],Greater]&]
Showing 1-10 of 29 results.
Comments