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
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}]
A376263
Number of strict integer compositions of n whose leaders of increasing runs are increasing.
Original entry on oeis.org
1, 1, 1, 2, 2, 3, 5, 6, 8, 11, 18, 21, 30, 38, 52, 77, 96, 126, 167, 217, 278, 402, 488, 647, 822, 1073, 1340, 1747, 2324, 2890, 3695, 4690, 5924, 7469, 9407, 11718, 15405, 18794, 23777, 29507, 37188, 45720, 57404, 70358, 87596, 110672, 135329, 167018, 206761, 254200, 311920
Offset: 0
The a(1) = 1 through a(9) = 11 compositions:
(1) (2) (3) (4) (5) (6) (7) (8) (9)
(1,2) (1,3) (1,4) (1,5) (1,6) (1,7) (1,8)
(2,3) (2,4) (2,5) (2,6) (2,7)
(1,2,3) (3,4) (3,5) (3,6)
(1,3,2) (1,2,4) (1,2,5) (4,5)
(1,4,2) (1,3,4) (1,2,6)
(1,4,3) (1,3,5)
(1,5,2) (1,5,3)
(1,6,2)
(2,3,4)
(2,4,3)
For less-greater or greater-less we have
A294617.
A374700 counts compositions by sum of leaders of strictly increasing runs.
Cf.
A000110,
A008289,
A056823,
A106356,
A188920,
A238343,
A261982,
A274174,
A333213,
A374634,
A374683,
A374698,
A374763.
-
Table[Length[Select[Join@@Permutations/@IntegerPartitions[n], UnsameQ@@#&&Less@@First/@Split[#,Less]&]],{n,0,15}]
-
\\ here Q(n) gives n-th row of A008289.
Q(n)={Vecrev(polcoef(prod(k=1, n, 1 + y*x^k, 1 + O(x*x^n)), n)/y)}
a(n)={if(n==0, 1, my(r=Q(n), s=Vec(serlaplace(exp(exp(x+O(x^#r))- 1)))); sum(k=1, #r, r[k]*s[k]))} \\ Andrew Howroyd, Sep 18 2024
Comments