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.

Showing 1-10 of 14 results. Next

A188920 a(n) is the limiting term of the n-th column of the triangle in A188919.

Original entry on oeis.org

1, 1, 2, 4, 7, 13, 22, 38, 63, 105, 169, 274, 434, 686, 1069, 1660, 2548, 3897, 5906, 8911, 13352, 19917, 29532, 43605, 64056, 93715, 136499, 198059, 286233, 412199, 591455, 845851, 1205687, 1713286, 2427177, 3428611, 4829563, 6784550, 9505840, 13284849
Offset: 0

Views

Author

N. J. A. Sloane, Apr 13 2011

Keywords

Comments

Also the number of integer compositions of n whose reverse avoids 12-1 and 23-1.
Theorem: The reverse of a composition avoids 12-1 and 23-1 iff its leaders of maximal weakly increasing runs, obtained by splitting it into maximal weakly increasing subsequences and taking the first term of each, are strictly decreasing. For example, the composition y = (4,5,3,2,2,3,1,3,5) has reverse (5,3,1,3,2,2,3,5,4), which avoids 12-1 and 23-1, while the maximal weakly increasing runs of y are ((4,5),(3),(2,2,3),(1,3,5)), with leaders (4,3,2,1), which are strictly decreasing, as required. - Gus Wiseman, Aug 20 2024

Examples

			From _Gus Wiseman_, Aug 20 2024: (Start)
The a(0) = 1 through a(6) = 22 compositions:
  ()  (1)  (2)   (3)    (4)     (5)      (6)
           (11)  (12)   (13)    (14)     (15)
                 (21)   (22)    (23)     (24)
                 (111)  (31)    (32)     (33)
                        (112)   (41)     (42)
                        (211)   (113)    (51)
                        (1111)  (122)    (114)
                                (212)    (123)
                                (221)    (132)
                                (311)    (213)
                                (1112)   (222)
                                (2111)   (312)
                                (11111)  (321)
                                         (411)
                                         (1113)
                                         (1122)
                                         (2112)
                                         (2211)
                                         (3111)
                                         (11112)
                                         (21111)
                                         (111111)
(End)
		

Crossrefs

For leaders of identical runs we have A000041.
Matching 23-1 only gives A189076.
An opposite version is A358836.
For identical leaders we have A374631, ranks A374633.
For distinct leaders we have A374632, ranks A374768.
For weakly increasing leaders we have A374635.
For non-weakly decreasing leaders we have A374636, ranks A375137.
For leaders of anti-runs we have A374680.
For leaders of strictly increasing runs we have A374689.
The complement is counted by A375140, ranks A375295, reverse A375296.
A011782 counts compositions.
A238130, A238279, A333755 count compositions by number of runs.

Programs

  • Mathematica
    b[u_, o_] := b[u, o] = Expand[If[u + o == 0, 1, Sum[b[u - j, o + j - 1]*x^(o + j - 1), {j, 1, u}] + Sum[If[u == 0, b[u + j - 1, o - j]*x^(o - j), 0], {j, 1, o}]]];
    T[n_] := Function[p, Table[Coefficient[p, x, i], {i, 0, Exponent[p, x]}]][ b[0, n]];
    Take[T[40], 40] (* Jean-François Alcover, Sep 15 2018, after Alois P. Heinz in A188919 *)
    Table[Length[Select[Join@@Permutations/@IntegerPartitions[n], Greater@@First/@Split[Reverse[#],LessEqual]&]],{n,0,15}] (* Gus Wiseman, Aug 20 2024 *)
    - or -
    Table[Length[Select[Join@@Permutations/@IntegerPartitions[n], !MatchQ[#,{_,y_,z_,_,x_,_}/;x<=yGus Wiseman, Aug 20 2024 *)
  • PARI
    B_x(i,N) = {my(x='x+O('x^N), f=(x^i)/(1-x^i)*prod(j=i+1,N-i,1/(1-x^j))); f}
    A_x(N) = {my(x='x+O('x^N), f=1+sum(i=1,N, B_x(i,N)*prod(j=1,i-1,1+B_x(j,N)))); Vec(f)}
    A_x(60) \\ John Tyler Rascoe, Aug 23 2024

Formula

a(n) = 2^(n-1) - A375140(n).
G.f.: 1 + Sum_{i>0} (B(i,x) * Product_{j=1..i-1} (1 + B(j,x))) where B(i,x) = (x^i)/(1-x^i) * Product_{j>i} (1/(1-x^j)). - John Tyler Rascoe, Aug 23 2024

Extensions

More terms from Andrew Baxter, May 17 2011
a(30)-a(39) from Alois P. Heinz, Nov 14 2015

A374687 Number of integer compositions of n whose leaders of strictly increasing runs are distinct.

Original entry on oeis.org

1, 1, 1, 3, 3, 7, 11, 15, 27, 45, 65, 101, 161, 251, 381, 573, 865, 1321, 1975, 2965, 4387, 6467, 9579, 14091, 20669, 30135, 43869, 63531, 91831, 132575, 190567, 273209, 390659, 557069, 792371, 1124381, 1591977, 2249029, 3169993, 4458163, 6256201, 8762251, 12246541
Offset: 0

Views

Author

Gus Wiseman, Jul 27 2024

Keywords

Comments

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

Examples

			The a(0) = 1 through a(7) = 15 compositions:
  ()  (1)  (2)  (3)   (4)   (5)    (6)    (7)
                (12)  (13)  (14)   (15)   (16)
                (21)  (31)  (23)   (24)   (25)
                            (32)   (42)   (34)
                            (41)   (51)   (43)
                            (122)  (123)  (52)
                            (212)  (132)  (61)
                                   (213)  (124)
                                   (231)  (133)
                                   (312)  (142)
                                   (321)  (214)
                                          (241)
                                          (313)
                                          (412)
                                          (421)
		

Crossrefs

Ranked by A374698.
Types of runs (instead of strictly increasing):
- For leaders of identical runs we have A274174 for n > 0, ranks A374249.
- For leaders of anti-runs we have A374518, ranks A374638.
- For leaders of weakly increasing runs we have A374632, ranks A374768.
- For leaders of weakly decreasing runs we have A374743, ranks A374701.
- For leaders of strictly decreasing runs we have A374761, ranks A374767.
Types of run-leaders (instead of distinct):
- For identical leaders we have A374686, ranks A374685.
- For strictly increasing leaders we have A374688.
- For strictly decreasing leaders we have A374689.
- For weakly increasing leaders we have A374690.
- For weakly decreasing leaders we have A374697.
A003242 counts anti-run compositions, ranks A333489.
A011782 counts compositions.
A238130, A238279, A333755 count compositions by number of runs.
A335456 counts patterns matched by compositions.
A373949 counts compositions by run-compressed sum, opposite A373951.
A374683 lists leaders of strictly increasing runs of standard compositions.
A374700 counts compositions by sum of leaders of strictly increasing runs.

Programs

  • Mathematica
    Table[Length[Select[Join@@Permutations /@ IntegerPartitions[n],UnsameQ@@First/@Split[#,Less]&]],{n,0,15}]
  • PARI
    dfs(m, r, v) = 1 + sum(s=1, min(m, r), if(!setsearch(v, s), dfs(m-s, s, setunion(v, [s]))*x^s + sum(t=s+1, m-s, dfs(m-s-t, t, setunion(v, [s]))*x^(s+t)*prod(i=s+1, t-1, 1+x^i))));
    lista(nn) = Vec(dfs(nn, nn, []) + O(x^(1+nn))); \\ Jinyuan Wang, Feb 13 2025

Extensions

More terms from Jinyuan Wang, Feb 13 2025

A374686 Number of integer compositions of n whose leaders of strictly increasing runs are identical.

Original entry on oeis.org

1, 1, 2, 3, 6, 9, 17, 29, 51, 91, 162, 291, 523, 948, 1712, 3112, 5656, 10297, 18763, 34217, 62442, 114006, 208239, 380465, 695342, 1271046, 2323818, 4249113, 7770389, 14210991, 25991853, 47541734, 86962675, 159077005, 291001483, 532345978, 973871397
Offset: 0

Views

Author

Gus Wiseman, Jul 27 2024

Keywords

Comments

The leaders of strictly increasing runs in a sequence are obtained by splitting it into maximal strictly increasing 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 minima are identical. For maxima instead of minima we have A374760. For all partitions (not just strict) we have A374704, for maxima A358905.

Examples

			The composition (2,3,2,2,3,4) has strictly increasing runs ((2,3),(2),(2,3,4)), with leaders (2,2,2), so is counted under a(16).
The a(0) = 1 through a(6) = 17 compositions:
  ()  (1)  (2)   (3)    (4)     (5)      (6)
           (11)  (12)   (13)    (14)     (15)
                 (111)  (22)    (23)     (24)
                        (112)   (113)    (33)
                        (121)   (131)    (114)
                        (1111)  (1112)   (123)
                                (1121)   (141)
                                (1211)   (222)
                                (11111)  (1113)
                                         (1131)
                                         (1212)
                                         (1311)
                                         (11112)
                                         (11121)
                                         (11211)
                                         (12111)
                                         (111111)
		

Crossrefs

Ranked by A374685.
Types of runs (instead of strictly increasing):
- For leaders of identical runs we have A000005 for n > 0, ranks A272919.
- For leaders of anti-runs we have A374517, ranks A374519.
- For leaders of weakly increasing runs we have A374631, ranks A374633.
- 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 distinct leaders we have A374687, ranks A374698.
- For strictly increasing leaders we have A374688.
- For strictly decreasing leaders we have A374689.
- For weakly increasing leaders we have A374690.
- For weakly decreasing leaders we have A374697.
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.
A335456 counts patterns matched by compositions.
A335548 counts non-contiguous compositions, ranks A374253.
A373949 counts compositions by run-compressed sum, opposite A373951.
A374683 lists leaders of strictly increasing runs of standard compositions.
A374700 counts compositions by sum of leaders of strictly increasing runs.

Programs

  • Mathematica
    Table[Length[Select[Join @@ Permutations/@IntegerPartitions[n],SameQ@@First/@Split[#,Less]&]],{n,0,15}]
  • PARI
    seq(n) = Vec(1 + sum(k=1, n, 1/(1 - x^k*prod(j=k+1, n-k, 1 + x^j, 1 + O(x^(n-k+1))))-1)) \\ Andrew Howroyd, Jul 27 2024

Extensions

a(26) onwards from Andrew Howroyd, Jul 27 2024

A294617 Number of ways to choose a set partition of a strict integer partition of n.

Original entry on oeis.org

1, 1, 1, 3, 3, 5, 10, 12, 17, 24, 44, 51, 76, 98, 138, 217, 272, 366, 493, 654, 848, 1284, 1560, 2115, 2718, 3610, 4550, 6024, 8230, 10296, 13354, 17144, 21926, 27903, 35556, 44644, 59959, 73456, 94109, 117735, 150078, 185800, 235719, 290818, 365334, 467923
Offset: 0

Views

Author

Gus Wiseman, Nov 05 2017

Keywords

Comments

From Gus Wiseman, Sep 17 2024: (Start)
Also the number of strict integer compositions of n whose leaders, obtained by splitting into maximal increasing subsequences and taking the first term of each, are decreasing. For example, the strict composition (3,6,2,1,4) has maximal increasing subsequences ((3,6),(2),(1,4)), with leaders (3,2,1), so is counted under a(16). The a(0) = 1 through a(7) = 12 compositions are:
() (1) (2) (3) (4) (5) (6) (7)
(1,2) (1,3) (1,4) (1,5) (1,6)
(2,1) (3,1) (2,3) (2,4) (2,5)
(3,2) (4,2) (3,4)
(4,1) (5,1) (4,3)
(1,2,3) (5,2)
(2,1,3) (6,1)
(2,3,1) (1,2,4)
(3,1,2) (2,1,4)
(3,2,1) (2,4,1)
(4,1,2)
(4,2,1)
(End)

Examples

			The a(6) = 10 set partitions are: {{6}}, {{1},{5}}, {{5,1}}, {{2},{4}}, {{4,2}}, {{1},{2},{3}}, {{1},{3,2}}, {{2,1},{3}}, {{3,1},{2}}, {{3,2,1}}.
		

Crossrefs

Row sums of A330460 and of A330759.
This is a strict case of A374689, weak version A189076.
A011782 counts compositions, strict A032020.
A238130, A238279, A333755 count compositions by number of runs.

Programs

  • Maple
    b:= proc(n, i, t) option remember; `if`(n>i*(i+1)/2, 0,
          `if`(n=0, combinat[bell](t), b(n, i-1, t)+
          `if`(i>n, 0, b(n-i, min(n-i, i-1), t+1))))
        end:
    a:= n-> b(n$2, 0):
    seq(a(n), n=0..50);  # Alois P. Heinz, Nov 07 2017
  • Mathematica
    Table[Total[BellB[Length[#]]&/@Select[IntegerPartitions[n],UnsameQ@@#&]],{n,25}]
    (* Second program: *)
    b[n_, i_, t_] := b[n, i, t] = If[n > i (i + 1)/2, 0, If[n == 0, BellB[t], b[n, i - 1, t] + If[i > n, 0, b[n - i, Min[n - i, i - 1], t + 1]]]];
    a[n_] := b[n, n, 0];
    a /@ Range[0, 50] (* Jean-François Alcover, May 10 2021, after Alois P. Heinz *)

Formula

A279375(n) <= a(n) <= A279790(n).
G.f.: Sum_{k>=0} Bell(k) * x^(k*(k + 1)/2) / Product_{j=1..k} (1 - x^j). - Ilya Gutkovskiy, Jan 28 2020

A374688 Number of integer compositions of n whose leaders of strictly increasing runs are themselves strictly increasing.

Original entry on oeis.org

1, 1, 1, 2, 2, 4, 5, 7, 11, 16, 21, 31, 45, 63, 87, 122, 170, 238, 328, 449, 616, 844, 1151, 1565, 2121, 2861, 3855, 5183, 6953, 9299, 12407, 16513, 21935, 29078, 38468, 50793, 66935, 88037, 115577, 151473, 198175, 258852, 337560, 439507, 571355, 741631
Offset: 0

Views

Author

Gus Wiseman, Jul 27 2024

Keywords

Comments

The leaders of strictly increasing runs in a sequence are obtained by splitting it into maximal strictly increasing 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 minima are strictly decreasing.

Examples

			The a(0) = 1 through a(9) = 16 compositions:
  ()  (1)  (2)  (3)   (4)   (5)    (6)    (7)    (8)     (9)
                (12)  (13)  (14)   (15)   (16)   (17)    (18)
                            (23)   (24)   (25)   (26)    (27)
                            (122)  (123)  (34)   (35)    (36)
                                   (132)  (124)  (125)   (45)
                                          (133)  (134)   (126)
                                          (142)  (143)   (135)
                                                 (152)   (144)
                                                 (233)   (153)
                                                 (1223)  (162)
                                                 (1232)  (234)
                                                         (243)
                                                         (1224)
                                                         (1233)
                                                         (1242)
                                                         (1323)
		

Crossrefs

The weak version is A374635.
Ranked by positions of strictly increasing rows in A374683 (sums A374684).
The opposite version is A374763.
Types of runs (instead of strictly increasing):
- For leaders of identical runs we have A000041.
- For leaders of anti-runs we have A374679.
- For leaders of weakly increasing runs we have A374634.
- For leaders of strictly decreasing runs we have A374762.
Types of run-leaders (instead of strictly increasing):
- For identical leaders we have A374686, ranks A374685.
- For distinct leaders we have A374687, ranks A374698.
- For strictly decreasing leaders we have A374689.
- For weakly increasing leaders we have A374690.
- For weakly decreasing leaders we have A374697.
A003242 counts anti-run compositions, ranks A333489.
A011782 counts compositions.
A238130, A238279, A333755 count compositions by number of runs.
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[#,Less]&]],{n,0,15}]

Extensions

a(26) and beyond from Christian Sievers, Aug 08 2024

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

Original entry on oeis.org

1, 1, 2, 4, 8, 15, 29, 55, 103, 193, 360, 669, 1239, 2292, 4229, 7794, 14345, 26375, 48452, 88946, 163187, 299250, 548543, 1005172, 1841418, 3372603, 6175853, 11307358, 20699979, 37890704, 69351776, 126926194, 232283912, 425075191, 777848212, 1423342837, 2604427561
Offset: 0

Views

Author

Gus Wiseman, Jul 27 2024

Keywords

Comments

The leaders of strictly increasing runs in a sequence are obtained by splitting it into maximal strictly increasing 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 minima are weakly decreasing [weakly increasing works too].

Examples

			The composition (1,2,1,3,2,3) has strictly increasing runs ((1,2),(1,3),(2,3)), with leaders (1,1,2), so is not counted under a(12).
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)
		

Crossrefs

The opposite version is A374764.
Ranked by positions of weakly decreasing rows in A374683.
Interchanging weak/strict appears to give A188920, opposite A358836.
Types of runs (instead of strictly increasing):
- For leaders of identical runs we have A000041.
- For leaders of anti-runs we have A374682.
- 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.
Types of run-leaders (instead of weakly decreasing):
- For identical leaders we have A374686, ranks A374685.
- For distinct leaders we have A374687, ranks A374698.
- For weakly increasing leaders we have A374690.
- For strictly increasing leaders we have A374688.
- For strictly decreasing leaders we have A374689.
A003242 counts anti-run compositions, ranks A333489.
A011782 counts compositions.
A238130, A238279, A333755 count compositions by number of runs.
A335456 counts patterns matched by compositions.
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],GreaterEqual@@First/@Split[#,Less]&]],{n,0,15}]
  • PARI
    seq(n) = Vec(1/prod(k=1, n, 1 - x^k*prod(j=k+1, n-k, 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>=k+1} (1 + x^j))). - Andrew Howroyd, Jul 31 2024

Extensions

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

A374680 Number of integer compositions of n whose leaders of anti-runs are strictly decreasing.

Original entry on oeis.org

1, 1, 1, 3, 5, 8, 16, 31, 52, 98, 179, 323, 590, 1078, 1945, 3531, 6421, 11621, 21041, 38116, 68904, 124562, 225138, 406513, 733710, 1323803
Offset: 0

Views

Author

Gus Wiseman, Aug 01 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

			The a(0) = 1 through a(6) = 16 compositions:
  ()  (1)  (2)  (3)   (4)    (5)    (6)
                (12)  (13)   (14)   (15)
                (21)  (31)   (23)   (24)
                      (121)  (32)   (42)
                      (211)  (41)   (51)
                             (131)  (123)
                             (212)  (132)
                             (311)  (141)
                                    (213)
                                    (231)
                                    (312)
                                    (321)
                                    (411)
                                    (1212)
                                    (2112)
                                    (2121)
		

Crossrefs

For distinct but not necessarily decreasing leaders we have A374518.
For partitions instead of compositions we have A375133.
Other types of runs (instead of anti-):
- For leaders of identical runs we have A000041.
- For leaders of weakly increasing runs we have A188920.
- For leaders of weakly decreasing runs we have A374746.
- For leaders of strictly decreasing runs we have A374763.
- For leaders of strictly increasing runs we have A374689.
Other types of run-leaders (instead of strictly decreasing):
- For identical leaders we have A374517, ranks A374519.
- For distinct leaders we have A374518, ranks A374638.
- For weakly increasing leaders we have A374681.
- For strictly increasing leaders we have A374679.
- For weakly decreasing leaders we have A374682.
A003242 counts anti-runs, ranks A333489.
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.
A274174 counts contiguous compositions, ranks A374249.

Programs

  • Mathematica
    Table[Length[Select[Join@@Permutations /@ IntegerPartitions[n],Greater@@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

Views

Author

Gus Wiseman, Jul 26 2024

Keywords

Comments

The weakly decreasing run-leaders of a sequence are obtained by splitting it into maximal weakly decreasing subsequences and taking the first term of each.

Examples

			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)
		

Crossrefs

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 distinct leaders we have A374743, ranks A374701.
- For strictly increasing leaders we have opposite A374634.
- For weakly decreasing leaders we have A374747.
A011782 counts compositions.
A238130, A238279, A333755 count compositions by number of runs.
A335456 counts patterns matched by compositions.
A373949 counts compositions by run-compressed sum, opposite A373951.
A374748 counts compositions by sum of leaders of weakly decreasing runs.

Programs

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

Formula

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

Extensions

a(24)-a(39) from Alois P. Heinz, Jul 26 2024

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
Showing 1-10 of 14 results. Next