cp's OEIS Frontend

This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.

Previous Showing 21-30 of 30 results.

A374762 Number of integer compositions of n whose leaders of strictly decreasing runs are strictly increasing.

Original entry on oeis.org

1, 1, 1, 3, 4, 6, 11, 18, 27, 41, 64, 98, 151, 229, 339, 504, 746, 1097, 1618, 2372, 3451, 5009, 7233, 10394, 14905, 21316, 30396, 43246, 61369, 86830, 122529, 172457, 242092, 339062, 473850, 660829, 919822, 1277935, 1772174, 2453151, 3389762, 4675660, 6438248
Offset: 0

Views

Author

Gus Wiseman, Jul 29 2024

Keywords

Comments

The leaders of strictly decreasing runs in a sequence are obtained by splitting it into maximal strictly decreasing subsequences and taking the first term of each.
Also the number of ways to choose a strict integer partition of each part of an integer composition of n (A304969) such that the maxima are strictly decreasing. The weakly decreasing version is A374764.

Examples

			The a(0) = 1 through a(7) = 18 compositions:
  ()  (1)  (2)  (3)   (4)    (5)    (6)    (7)
                (12)  (13)   (14)   (15)   (16)
                (21)  (31)   (23)   (24)   (25)
                      (121)  (32)   (42)   (34)
                             (41)   (51)   (43)
                             (131)  (123)  (52)
                                    (132)  (61)
                                    (141)  (124)
                                    (213)  (142)
                                    (231)  (151)
                                    (321)  (214)
                                           (232)
                                           (241)
                                           (421)
                                           (1213)
                                           (1231)
                                           (1321)
                                           (2131)
		

Crossrefs

For partitions instead of compositions we have A000009.
The weak version appears to be A188900.
The opposite version is A374689.
Other types of runs (instead of strictly decreasing):
- For leaders of identical runs we have A000041.
- For leaders of weakly increasing runs we have A374634.
- For leaders of anti-runs we have A374679.
Other types of run-leaders (instead of strictly increasing):
- For identical leaders we have A374760, ranks A374759.
- For distinct leaders we have A374761, ranks A374767.
- For strictly decreasing leaders we have A374763.
- For weakly increasing leaders we have A374764.
- For weakly decreasing leaders we have A374765.
A003242 counts anti-run compositions, ranks A333489.
A011782 counts compositions.
A238130, A238279, A333755 count compositions by number of runs.
A274174 counts contiguous compositions, ranks A374249.
A373949 counts compositions by run-compressed sum, opposite A373951.
A374700 counts compositions by sum of leaders of strictly increasing runs.

Programs

  • Mathematica
    Table[Length[Select[Join@@Permutations /@ IntegerPartitions[n],Less@@First/@Split[#,Greater]&]],{n,0,15}]
  • PARI
    seq(n) = Vec(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

Formula

G.f.: Product_{k>=1} (1 + x^k*Product_{j=1..k-1} (1 + x^j)). - Andrew Howroyd, Jul 31 2024

Extensions

a(24) onwards from Andrew Howroyd, Jul 31 2024

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

Views

Author

Gus Wiseman, Jul 30 2024

Keywords

Comments

The leaders of strictly decreasing runs in a sequence are obtained by splitting it into maximal strictly decreasing subsequences and taking the first term of each.

Examples

			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)
		

Crossrefs

The opposite version is A374688.
The weak version is A374747.
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 identical leaders we have A374760, ranks A374759.
- For distinct leaders we have A374761, ranks A374767.
- For strictly increasing leaders we have A374762.
- For weakly increasing leaders we have A374764.
- For weakly decreasing leaders we have A374765.
A003242 counts anti-run compositions, ranks A333489.
A011782 counts compositions.
A238130, A238279, A333755 count compositions by number of runs.
A274174 counts contiguous compositions, ranks A374249.
A373949 counts compositions by run-compressed sum, opposite A373951.

Programs

  • Mathematica
    Table[Length[Select[Join@@Permutations /@ IntegerPartitions[n],Greater@@First/@Split[#,Greater]&]],{n,0,15}]
  • PARI
    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

Formula

G.f.: Sum_{k>=0} x^k*Q(k,x) where Q(0,x) = 1 and Q(k,x) = Q(k-1,x) * (1 + x^k*Product_{j=1..k} (1 + x^j)) for k > 0. - Andrew Howroyd, Dec 30 2024

Extensions

a(24) onwards from 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

Views

Author

Gus Wiseman, Jul 30 2024

Keywords

Comments

The leaders of strictly decreasing runs in a sequence are obtained by splitting it into maximal strictly decreasing subsequences and taking the first term of each.
Also the number of ways to choose a strict integer partition of each part of an integer composition of n (A304969) such that the maxima are weakly increasing [but weakly decreasing works too]. The strictly increasing version is A374762.

Examples

			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)
		

Crossrefs

For partitions instead of compositions we have A034296.
For strictly increasing leaders we have A374688.
The opposite version is A374697.
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 identical leaders we have A374760, ranks A374759.
- For distinct leaders we have A374761, ranks A374767.
- For strictly increasing leaders we have A374762.
- For weakly decreasing leaders we have A374765.
- For strictly decreasing leaders we have A374763.
A003242 counts anti-run compositions, ranks A333489.
A011782 counts compositions.
A238130, A238279, A333755 count compositions by number of runs.
A274174 counts contiguous compositions, ranks A374249.
A335548 counts non-contiguous compositions, ranks A374253.
A373949 counts compositions by run-compressed sum, opposite A373951.

Programs

  • Mathematica
    Table[Length[Select[Join@@Permutations /@ IntegerPartitions[n],LessEqual@@First/@Split[#,Greater]&]],{n,0,15}]
  • PARI
    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

Formula

G.f.: 1/(Product_{k>=1} (1 - x^k*Product_{j=1..k-1} (1 + x^j))). - Andrew Howroyd, Jul 31 2024

Extensions

a(24) onwards from Andrew Howroyd, Jul 31 2024

A375398 Numbers k such that the minima of maximal anti-runs in the weakly increasing sequence of prime factors of k (with multiplicity) are distinct.

Original entry on oeis.org

1, 2, 3, 5, 6, 7, 10, 11, 13, 14, 15, 17, 18, 19, 21, 22, 23, 26, 29, 30, 31, 33, 34, 35, 37, 38, 39, 41, 42, 43, 46, 47, 50, 51, 53, 55, 57, 58, 59, 61, 62, 65, 66, 67, 69, 70, 71, 73, 74, 75, 77, 78, 79, 82, 83, 85, 86, 87, 89, 90, 91, 93, 94, 95, 97, 98
Offset: 1

Views

Author

Gus Wiseman, Aug 16 2024

Keywords

Comments

First differs from A375402 in lacking 20.
An anti-run is a sequence with no adjacent equal parts.
The minima of maximal anti-runs in a sequence are obtained by splitting it into maximal anti-run subsequences and taking the least term of each.
Note the prime factors can alternatively be taken in weakly decreasing order.

Examples

			The prime factors of 300 are {2,2,3,5,5}, with maximal anti-runs ((2),(2,3,5),(5)), with minima (2,2,5), so 300 is not in the sequence.
The prime factors of 450 are {2,3,3,5,5}, with maximal anti-runs ((2,3),(3,5),(5)), with minima (2,3,5), so 450 is in the sequence.
		

Crossrefs

A version for compositions is A374638, counted by A374518.
These are positions of strict rows in A375128, sums A374706, ranks A375400.
Partitions (or reversed partitions) of this type are counted by A375134.
For identical instead of distinct we have A375396, counted by A115029.
The complement is A375399, counted by A375404.
For maxima instead of minima we have A375402, counted by A375133.
The complement for maxima is A375403, counted by A375401.
A000041 counts integer partitions, strict A000009.
A003242 counts anti-run compositions, ranks A333489.
A number's prime factors (A027746, reverse A238689) have sum A001414, min A020639, max A006530.
A number's prime indices (A112798, reverse A296150) have sum A056239, min A055396, max A061395.
Both have length A001222, distinct A001221.

Programs

  • Mathematica
    Select[Range[100],UnsameQ@@Min /@ Split[Flatten[ConstantArray@@@FactorInteger[#]],UnsameQ]&]

A375399 Numbers k such that the minima of maximal anti-runs in the weakly increasing sequence of prime factors of k (with multiplicity) are not distinct.

Original entry on oeis.org

4, 8, 9, 12, 16, 20, 24, 25, 27, 28, 32, 36, 40, 44, 45, 48, 49, 52, 54, 56, 60, 63, 64, 68, 72, 76, 80, 81, 84, 88, 92, 96, 99, 100, 104, 108, 112, 116, 117, 120, 121, 124, 125, 128, 132, 135, 136, 140, 144, 148, 152, 153, 156, 160, 162, 164, 168, 169, 171
Offset: 1

Views

Author

Gus Wiseman, Aug 16 2024

Keywords

Comments

An anti-run is a sequence with no adjacent equal terms.
The minima of maximal anti-runs in a sequence are obtained by splitting it into maximal anti-run subsequences and taking the least term of each.
Note the prime factors can alternatively be taken in weakly decreasing order.

Examples

			The prime factors of 300 are {2,2,3,5,5}, with maximal anti-runs ((2),(2,3,5),(5)), with minima (2,2,5), so 300 is in the sequence.
The prime factors of 450 are {2,3,3,5,5}, with maximal anti-runs ((2,3),(3,5),(5)), with minima (2,3,5), so 450 is not in the sequence.
The terms together with their prime indices begin:
     4: {1,1}
     8: {1,1,1}
     9: {2,2}
    12: {1,1,2}
    16: {1,1,1,1}
    20: {1,1,3}
    24: {1,1,1,2}
    25: {3,3}
    27: {2,2,2}
    28: {1,1,4}
    32: {1,1,1,1,1}
    36: {1,1,2,2}
    40: {1,1,1,3}
    44: {1,1,5}
    45: {2,2,3}
    48: {1,1,1,1,2}
		

Crossrefs

The complement for compositions is A374638, counted by A374518.
A version for compositions is A374639, counted by A374678.
Positions of non-strict rows in A375128, sums A374706, ranks A375400.
For identical instead of strict we have A375397, counted by A375405.
The complement is A375398, counted by A375134.
The complement for maxima instead of minima is A375402, counted by A375133.
For maxima instead of minima we have A375403, counted by A375401.
Partitions (or reversed partitions) of this type are counted by A375404.
A000041 counts integer partitions, strict A000009.
A003242 counts anti-run compositions, ranks A333489.
A number's prime factors (A027746, reverse A238689) have sum A001414, min A020639, max A006530.
A number's prime indices (A112798, reverse A296150) have sum A056239, min A055396, max A061395.
Both have length A001222, distinct A001221.

Programs

  • Mathematica
    Select[Range[100],!UnsameQ@@Min /@ Split[Flatten[ConstantArray@@@FactorInteger[#]],UnsameQ]&]

A375401 Number of integer partitions of n whose maximal anti-runs do not all have different maxima.

Original entry on oeis.org

0, 0, 1, 1, 2, 3, 6, 7, 12, 16, 25, 33, 48, 63, 88, 116, 157, 204, 272, 349, 456, 581, 749, 946, 1205, 1511, 1904, 2371, 2960, 3661, 4538, 5577, 6862, 8389, 10257, 12472, 15164, 18348, 22192, 26731, 32177, 38593, 46254, 55256, 65952, 78500, 93340, 110706
Offset: 0

Views

Author

Gus Wiseman, Aug 17 2024

Keywords

Comments

An anti-run is a sequence with no adjacent equal terms. The maxima of maximal anti-runs in a sequence are obtained by splitting it into maximal anti-run subsequences and taking the greatest term of each.

Examples

			The partition y = (3,2,2,1) has maximal ant-runs ((3,2),(2,1)), with maxima (3,2), so y is not counted under a(8).
The a(2) = 1 through a(8) = 12 partitions:
  (11)  (111)  (22)    (221)    (33)      (331)      (44)
               (1111)  (2111)   (222)     (2221)     (332)
                       (11111)  (2211)    (4111)     (2222)
                                (3111)    (22111)    (3311)
                                (21111)   (31111)    (5111)
                                (111111)  (211111)   (22211)
                                          (1111111)  (32111)
                                                     (41111)
                                                     (221111)
                                                     (311111)
                                                     (2111111)
                                                     (11111111)
		

Crossrefs

For identical instead of distinct we have A239955, ranks A073492.
The complement is counted by A375133, ranks A375402.
The complement for minima instead of maxima is A375134, ranks A375398.
These partitions have Heinz numbers A375403.
For minima instead of maxima we have A375404, ranks A375399.
The reverse for identical instead of distinct is A375405, ranks A375397.
A000041 counts integer partitions, strict A000009.
A003242 counts anti-run compositions, ranks A333489.
A055887 counts sequences of partitions with total sum n.
A375128 lists minima of maximal anti-runs of prime indices, sums A374706.

Programs

  • Mathematica
    Table[Length[Select[IntegerPartitions[n], !UnsameQ@@Max/@Split[#,UnsameQ]&]],{n,0,30}]

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

Views

Author

Gus Wiseman, Jul 30 2024

Keywords

Comments

The leaders of strictly decreasing runs in a sequence are obtained by splitting it into maximal strictly decreasing subsequences and taking the first term of each.

Examples

			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)
		

Crossrefs

The opposite version is A374690.
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 identical leaders we have A374760, ranks A374759.
- For distinct leaders we have A374761, ranks A374767.
- For strictly increasing leaders we have A374762.
- For strictly decreasing leaders we have A374763.
- For weakly increasing leaders we have A374764.
A003242 counts anti-run compositions, ranks A333489.
A011782 counts compositions.
A238130, A238279, A333755 count compositions by number of runs.
A274174 counts contiguous compositions, ranks A374249.
A373949 counts compositions by run-compressed sum, opposite A373951.

Programs

  • Mathematica
    Table[Length[Select[Join@@Permutations /@ IntegerPartitions[n],GreaterEqual@@First/@Split[#,Greater]&]],{n,0,15}]
  • PARI
    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

Extensions

More terms from Jinyuan Wang, Feb 13 2025

A374521 Triangle read by rows where T(n,k) is the number of integer compositions of n whose leaders of anti-runs sum to k.

Original entry on oeis.org

1, 0, 1, 0, 0, 2, 0, 1, 1, 2, 0, 2, 1, 2, 3, 0, 2, 5, 3, 4, 2, 0, 5, 7, 8, 3, 5, 4, 0, 9, 12, 11, 17, 5, 8, 2, 0, 14, 26, 23, 22, 24, 6, 9, 4, 0, 25, 42, 54, 41, 36, 36, 7, 12, 3, 0, 46, 76, 88, 107, 60, 60, 48, 9, 14, 4
Offset: 0

Views

Author

Gus Wiseman, Aug 02 2024

Keywords

Comments

The leaders of anti-runs in a sequence are obtained by splitting it into maximal consecutive anti-runs (sequences with no adjacent equal terms) and taking the first term of each.

Examples

			Triangle begins:
   1
   0   1
   0   0   2
   0   1   1   2
   0   2   1   2   3
   0   2   5   3   4   2
   0   5   7   8   3   5   4
   0   9  12  11  17   5   8   2
   0  14  26  23  22  24   6   9   4
   0  25  42  54  41  36  36   7  12   3
   0  46  76  88 107  60  60  48   9  14   4
   0  78 144 166 179 176 101  83  68  10  17   2
   0 136 258 327 339 311 299 139 122  81  12  18   6
   0 242 457 602 704 591 544 447 198 165 109  12  23   2
Row n = 6 counts the following compositions:
  .  (15)    (24)    (321)    (42)     (51)     (6)
     (141)   (114)   (312)    (1122)   (411)    (33)
     (132)   (231)   (1113)   (11112)  (3111)   (222)
     (123)   (213)   (2112)            (2211)   (111111)
     (1212)  (1311)  (1221)            (21111)
             (1131)  (12111)
             (2121)  (11211)
                     (11121)
		

Crossrefs

Column n = k is A000005, except a(0) = 1.
Row-sums are A011782.
Column k = 1 is A096569.
For length instead of sum we have A106356.
The corresponding rank statistic is A374516, row-sums of A374515.
For identical leaders we have A374517, ranks A374519.
For distinct leaders we have A374518, ranks A374638.
Other types of runs (instead of anti-):
- For leaders of identical runs we have A373949.
- For leaders of weakly increasing runs we have A374637.
- For leaders of strictly increasing runs we have A374700.
- For leaders of weakly decreasing runs we have A374748.
- For leaders of strictly decreasing runs we have A374766.
A003242 counts anti-run compositions.
A238130, A238279, A333755 count compositions by number of runs.
A274174 counts contiguous compositions, ranks A374249.

Programs

  • Mathematica
    Table[Length[Select[Join@@Permutations /@ IntegerPartitions[n],Total[First/@Split[#,UnsameQ]]==k&]],{n,0,15},{k,0,n}]

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

Views

Author

Gus Wiseman, Aug 10 2024

Keywords

Comments

The leaders of weakly increasing runs in a sequence are obtained by splitting it into maximal weakly increasing subsequences and taking the first term of each.
Also the number of integer compositions of n matching the dashed patterns 1-32 or 1-21.

Examples

			The a(1) = 0 through a(6) = 10 compositions:
     .  .  .  (121)  (131)   (132)
                     (1121)  (141)
                     (1211)  (1131)
                             (1212)
                             (1221)
                             (1311)
                             (2121)
                             (11121)
                             (11211)
                             (12111)
		

Crossrefs

For leaders of identical runs we have A056823.
The complement is counted by A188920.
Leaders of weakly increasing runs are rows of A374629, sum A374630.
For weakly decreasing leaders we have A374636, ranks A375137 or A375138.
For leaders of weakly decreasing runs we have the complement of A374746.
Compositions of this type are ranked by A375295, reverse A375296.
A003242 counts anti-runs, ranks A333489.
A106356 counts compositions by number of maximal anti-runs.
A238424 counts partitions whose first differences are an anti-run.
A274174 counts contiguous compositions, ranks A374249.
A011782 counts compositions.
A238130, A238279, A333755 count compositions by number of runs.
A335456 counts patterns matched by compositions.
A335548 counts non-contiguous compositions, ranks A374253.
A374637 counts compositions by sum of leaders of weakly increasing runs.

Programs

  • Mathematica
    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
    				

Formula

a(n) = 2^(n-1) - A188920(n).

A374766 Triangle read by rows where T(n,k) is the number of integer compositions of n whose leaders of maximal strictly decreasing runs sum to k.

Original entry on oeis.org

1, 0, 1, 0, 0, 2, 0, 0, 1, 3, 0, 0, 0, 3, 5, 0, 0, 0, 1, 8, 7, 0, 0, 0, 1, 3, 17, 11, 0, 0, 0, 0, 4, 10, 35, 15, 0, 0, 0, 0, 1, 12, 28, 65, 22, 0, 0, 0, 0, 1, 6, 31, 70, 118, 30, 0, 0, 0, 0, 1, 3, 22, 78, 163, 203, 42, 0, 0, 0, 0, 0, 4, 13, 69, 186, 354, 342, 56
Offset: 0

Views

Author

Gus Wiseman, Aug 02 2024

Keywords

Comments

The leaders of strictly decreasing runs in a sequence are obtained by splitting it into maximal strictly decreasing subsequences and taking the first term of each.
Are the column-sums finite?

Examples

			Triangle begins:
   1
   0   1
   0   0   2
   0   0   1   3
   0   0   0   3   5
   0   0   0   1   8   7
   0   0   0   1   3  17  11
   0   0   0   0   4  10  35  15
   0   0   0   0   1  12  28  65  22
   0   0   0   0   1   6  31  70 118  30
   0   0   0   0   1   3  22  78 163 203  42
   0   0   0   0   0   4  13  69 186 354 342  56
Row n = 6 counts the following compositions:
  .  .  .  (321)  (42)    (51)     (6)
                  (132)   (411)    (15)
                  (2121)  (141)    (24)
                          (312)    (114)
                          (231)    (33)
                          (213)    (123)
                          (3111)   (1113)
                          (1311)   (222)
                          (1131)   (1122)
                          (2211)   (11112)
                          (2112)   (111111)
                          (1221)
                          (1212)
                          (21111)
                          (12111)
                          (11211)
                          (11121)
		

Crossrefs

Column n = k is A000041.
Row-sums are A011782.
For length instead of sum we have A333213.
The corresponding rank statistic is A374758, row-sums of A374757.
For identical leaders we have A374760, ranks A374759.
For distinct leaders we have A374761, ranks A374767.
Other types of runs (instead of strictly decreasing):
- For leaders of identical runs we have A373949.
- For leaders of anti-runs we have A374521.
- For leaders of weakly increasing runs we have A374637.
- For leaders of strictly increasing runs we have A374700.
- For leaders of weakly decreasing runs we have A374748.
A003242 counts anti-run compositions.
A238130, A238279, A333755 count compositions by number of runs.
A335456 counts patterns matched by compositions.

Programs

  • Mathematica
    Table[Length[Select[Join@@Permutations /@ IntegerPartitions[n],Total[First/@Split[#,Greater]]==k&]], {n,0,15},{k,0,n}]
Previous Showing 21-30 of 30 results.