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 61-70 of 70 results.

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).

A375295 Numbers k such that the leaders of maximal weakly increasing runs in the k-th composition in standard order (row k of A066099) are not strictly decreasing.

Original entry on oeis.org

13, 25, 27, 29, 45, 49, 50, 51, 53, 54, 55, 57, 59, 61, 77, 82, 89, 91, 93, 97, 98, 99, 101, 102, 103, 105, 107, 108, 109, 110, 111, 113, 114, 115, 117, 118, 119, 121, 123, 125, 141, 153, 155, 157, 162, 165, 173, 177, 178, 179, 181, 182, 183, 185, 187, 189
Offset: 1

Views

Author

Gus Wiseman, Aug 12 2024

Keywords

Comments

First differs from the non-dashed version in lacking 166, corresponding to the composition (2,3,1,2).
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 numbers k such that the k-th composition in standard order (row k of A066099) matches the dashed patterns 1-32 or 1-21.

Examples

			The sequence together with corresponding compositions begins:
  13: (1,2,1)
  25: (1,3,1)
  27: (1,2,1,1)
  29: (1,1,2,1)
  45: (2,1,2,1)
  49: (1,4,1)
  50: (1,3,2)
  51: (1,3,1,1)
  53: (1,2,2,1)
  54: (1,2,1,2)
  55: (1,2,1,1,1)
  57: (1,1,3,1)
  59: (1,1,2,1,1)
  61: (1,1,1,2,1)
  77: (3,1,2,1)
  82: (2,3,2)
  89: (2,1,3,1)
  91: (2,1,2,1,1)
  93: (2,1,1,2,1)
		

Crossrefs

For leaders of identical runs we have A335485.
Positions of non-strictly decreasing rows in A374629 (sums A374630).
For identical leaders we have A374633, counted by A374631.
Matching 1-32 only gives A375137, reverse A375138, both counted by A374636.
Interchanging weak/strict gives A375139, counted by A375135.
Compositions of this type are counted by A375140, complement A188920.
The reverse version is A375296.
A003242 counts anti-runs, ranks A333489.
A011782 counts compositions.
A238130, A238279, A333755 count compositions by number of runs.
A274174 counts contiguous compositions, ranks A374249.
A374637 counts compositions by sum of leaders of weakly increasing runs.
All of the following pertain to compositions in standard order:
- Length is A000120.
- Sum is A029837(n+1).
- Leader is A065120.
- Parts are listed by A066099, reverse A228351.
- Number of adjacent equal pairs is A124762, unequal A333382.
- Strict compositions are A233564.
- Constant compositions are A272919.
- Run-length transform is A333627, sum A070939.

Programs

  • Mathematica
    stc[n_]:=Differences[Prepend[Join @@ Position[Reverse[IntegerDigits[n,2]],1],0]]//Reverse;
    Select[Range[0,100],!Greater@@First/@Split[stc[#],LessEqual]&]
    - or -
    stc[n_]:=Differences[Prepend[Join @@ Position[Reverse[IntegerDigits[n,2]],1],0]]//Reverse;
    Select[Range[0,100],MatchQ[stc[#],{_,x_,_,z_,y_,_}/;x<=y
    				

A375296 Numbers k such that the leaders of maximal weakly increasing runs in the reverse of the k-th composition in standard order (row k of A228351) are not strictly decreasing.

Original entry on oeis.org

13, 25, 27, 29, 41, 45, 49, 51, 53, 54, 55, 57, 59, 61, 77, 81, 82, 83, 89, 91, 93, 97, 99, 101, 102, 103, 105, 107, 108, 109, 110, 111, 113, 115, 117, 118, 119, 121, 123, 125, 141, 145, 153, 155, 157, 161, 162, 163, 165, 166, 167, 169, 173, 177, 179, 181, 182
Offset: 1

Views

Author

Gus Wiseman, Aug 13 2024

Keywords

Comments

The leaders of maximal weakly increasing runs in a sequence are obtained by splitting it into maximal weakly increasing subsequences and taking the first term of each.
The k-th composition in standard order (graded reverse-lexicographic, A066099) is obtained by taking the set of positions of 1's in the reversed binary expansion of k, prepending 0, taking first differences, and reversing again. This gives a bijective correspondence between nonnegative integers and integer compositions.
Also numbers k such that the k-th composition in standard order (row k of A066099) matches the dashed patterns 23-1 or 12-1.

Examples

			The sequence together with corresponding compositions begins:
  13: (1,2,1)
  25: (1,3,1)
  27: (1,2,1,1)
  29: (1,1,2,1)
  41: (2,3,1)
  45: (2,1,2,1)
  49: (1,4,1)
  51: (1,3,1,1)
  53: (1,2,2,1)
  54: (1,2,1,2)
  55: (1,2,1,1,1)
  57: (1,1,3,1)
  59: (1,1,2,1,1)
  61: (1,1,1,2,1)
		

Crossrefs

For leaders of identical runs we have A335486, reverse A335485.
Matching 1-32 only gives A375138, reverse A375137, both counted by A374636.
Compositions of this type are counted by A375140, complement A188920.
The reverse version is A375295.
A003242 counts anti-runs, ranks A333489.
A011782 counts compositions.
A238130, A238279, A333755 count compositions by number of runs.
A274174 counts contiguous compositions, ranks A374249.
A374637 counts compositions by sum of leaders of weakly increasing runs.
All of the following pertain to compositions in standard order:
- Length is A000120.
- Sum is A029837(n+1).
- Leader is A065120.
- Parts are listed by A066099, reverse A228351.
- Number of adjacent equal pairs is A124762, unequal A333382.
- Strict compositions are A233564.
- Constant compositions are A272919.
- Run-length transform is A333627, sum A070939.

Programs

  • Mathematica
    stc[n_]:=Differences[Prepend[Join @@ Position[Reverse[IntegerDigits[n,2]],1],0]]//Reverse;
    Select[Range[0,100],!Greater@@First/@Split[Reverse[stc[#]],LessEqual]&]
    - or -
    stc[n_]:=Differences[Prepend[Join @@ Position[Reverse[IntegerDigits[n,2]],1],0]]//Reverse;
    Select[Range[0,300],MatchQ[stc[#],{_,y_,z_,_,x_,_}/;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

Views

Author

Gus Wiseman, Aug 06 2024

Keywords

Comments

The leaders of maximal 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) = 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)
		

Crossrefs

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 identical leaders we have A374640, ranks A374520, complement A374517, ranks A374519.
- For distinct leaders we have A374678, ranks A374639, complement A374518, ranks A374638.
- 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.
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.
A333381 counts maximal anti-runs in standard compositions.

Programs

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

A374702 Number of integer compositions of n whose leaders of maximal weakly decreasing runs sum to 3. Column k = 3 of A374748.

Original entry on oeis.org

0, 0, 0, 2, 3, 6, 9, 13, 17, 23, 28, 35, 42, 50, 58, 68, 77, 88, 99, 111, 123, 137, 150, 165, 180, 196, 212, 230, 247, 266, 285, 305, 325, 347, 368, 391, 414, 438, 462, 488, 513, 540, 567, 595, 623, 653, 682, 713, 744, 776, 808, 842, 875, 910, 945, 981
Offset: 0

Views

Author

Gus Wiseman, Aug 12 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) = 0 through a(8) = 17 compositions:
  .  .  .  (3)   (31)   (32)    (33)     (322)     (332)
           (12)  (112)  (122)   (321)    (331)     (3221)
                 (121)  (311)   (1122)   (1222)    (3311)
                        (1112)  (1221)   (3211)    (11222)
                        (1121)  (3111)   (11122)   (12221)
                        (1211)  (11112)  (11221)   (32111)
                                (11121)  (12211)   (111122)
                                (11211)  (31111)   (111221)
                                (12111)  (111112)  (112211)
                                         (111121)  (122111)
                                         (111211)  (311111)
                                         (112111)  (1111112)
                                         (121111)  (1111121)
                                                   (1111211)
                                                   (1112111)
                                                   (1121111)
                                                   (1211111)
		

Crossrefs

The version for k = 2 is A004526.
The version for partitions is A069905 or A001399 (shifted).
For reversed partitions we appear to have A137719.
For length instead of sum we have A241627.
For leaders of constant runs we have A373952.
The opposite rank statistic is A374630, row-sums of A374629.
The corresponding rank statistic is A374741 row-sums of A374740.
Column k = 3 of A374748.
A003242 counts anti-run compositions.
A011782 counts integer 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[#,GreaterEqual]]==3&]],{n,0,15}]
  • PARI
    seq(n)={Vec((2 + x + x^2)/((1 + x + x^2)*(1 + x)*(1 - x)^3) + O(x^(n-2)), -n-1)} \\ Andrew Howroyd, Aug 14 2024

Formula

G.f.: x^3*(2 + x + x^2)/((1 + x + x^2)*(1 + x)*(1 - x)^3). - Andrew Howroyd, Aug 14 2024

Extensions

a(27) onwards from Andrew Howroyd, Aug 14 2024

A376520 Position of first appearance of 2n in the run-compression (A037201) of the first differences (A001223) of the prime numbers (A000040).

Original entry on oeis.org

2, 3, 8, 22, 32, 42, 28, 259, 91, 141, 172, 242, 341, 400, 556, 692, 198, 1119, 3126, 2072, 1779, 1737, 7596, 2913, 3246, 2101, 3598, 7651, 4383, 4294, 3457, 8284, 14220, 11986, 15101, 3204, 32808, 18217, 16273, 42990, 22303, 37037, 13729, 43117, 32820, 70501
Offset: 1

Views

Author

Gus Wiseman, Sep 26 2024

Keywords

Comments

We define the run-compression of a sequence to be the anti-run obtained by reducing each run of repeated parts to a single part. Alternatively, we can remove all parts equal to the part immediately to their left. For example, (1,1,2,2,1) has run-compression (1,2,1).

Examples

			The sequence of prime numbers (A000040) is:
  2, 3, 5, 7, 11, 13, 17, 19, 23, 29, 31, 37, 41, 43, 47, 53, 59, 61, 67, 71, 73, ...
with first differences (A001223):
  1, 2, 2, 4, 2, 4, 2, 4, 6, 2, 6, 4, 2, 4, 6, 6, 2, 6, 4, 2, 6, 4, 6, 8, 4, 2, 4, ...
with run-compression (A037201):
  1, 2, 4, 2, 4, 2, 4, 6, 2, 6, 4, 2, 4, 6, 2, 6, 4, 2, 6, 4, 6, 8, 4, 2, 4, 2, 4, ...
with first appearance of 2n at (A376520):
  2, 3, 8, 22, 32, 42, 28, 259, 91, 141, 172, 242, 341, 400, 556, 692, 198, 1119, ...
		

Crossrefs

This is the position of first appearance of 2n in A037201.
For positions of twos instead of first appearances we have A376343.
The sorted version is A376521.
A000040 lists the prime numbers, differences A001223.
A000961 and A246655 list prime-powers, differences A057820.
A003242 counts compressed compositions, ranks A333489.
A005117 lists squarefree numbers, differences A076259 (ones A375927).
A013929 lists nonsquarefree numbers, differences A078147.
A116861 counts partitions by compressed sum, compositions A373949.
A116608 counts partitions by compressed length, compositions A333755.
A274174 counts contiguous compositions, ranks A374249.
A333254 lists run-lengths of differences between consecutive primes.
A373948 encodes compression using compositions in standard order.

Programs

  • Mathematica
    mnrm[s_]:=If[Min@@s==1,mnrm[DeleteCases[s-1,0]]+1,0];
    q=First/@Split[Differences[Select[Range[10000],PrimeQ]]];
    Table[Position[q,2k][[1,1]],{k,mnrm[Rest[q]/2]}]

A374254 Numbers k such that the k-th composition in standard order is an anti-run and matches the patterns (1,2,1) or (2,1,2).

Original entry on oeis.org

13, 22, 25, 45, 49, 54, 76, 77, 82, 89, 97, 101, 102, 105, 108, 109, 141, 148, 150, 153, 162, 165, 166, 177, 178, 180, 182, 193, 197, 198, 204, 205, 209, 210, 216, 217, 269, 278, 280, 281, 297, 300, 301, 305, 306, 308, 310, 322, 325, 326, 332, 333, 353, 354
Offset: 1

Views

Author

Gus Wiseman, Jul 14 2024

Keywords

Comments

Such a composition cannot be strict.
The k-th composition in standard order (graded reverse-lexicographic, A066099) is obtained by taking the set of positions of 1's in the reversed binary expansion of k, prepending 0, taking first differences, and reversing again. This gives a bijective correspondence between nonnegative integers and integer compositions.

Examples

			The terms together with their standard compositions begin:
   13: (1,2,1)
   22: (2,1,2)
   25: (1,3,1)
   45: (2,1,2,1)
   49: (1,4,1)
   54: (1,2,1,2)
   76: (3,1,3)
   77: (3,1,2,1)
   82: (2,3,2)
   89: (2,1,3,1)
   97: (1,5,1)
  101: (1,3,2,1)
  102: (1,3,1,2)
  105: (1,2,3,1)
  108: (1,2,1,3)
  109: (1,2,1,2,1)
  141: (4,1,2,1)
  148: (3,2,3)
  150: (3,2,1,2)
  153: (3,1,3,1)
		

Crossrefs

Compositions of this type are counted by A285981.
Permutations of prime indices of this type are counted by A335460.
This is the anti-run complement case of A374249, counted by A274174.
This is the anti-run case of A374253, counted by A335548.
A003242 counts anti-run compositions, ranks A333489.
A011782 counts compositions.
A025047 counts wiggly compositions, ranks A345167.
A066099 lists compositions in standard order.
A124767 counts runs in standard compositions, anti-runs A333381.
A233564 ranks strict compositions, counted by A032020.
A333755 counts compositions by number of runs.
A335454 counts patterns matched by standard compositions.
A335456 counts patterns matched by compositions.
A335462 counts (1,2,1)- and (2,1,2)-matching permutations of prime indices.
A335465 counts minimal patterns avoided by a standard composition.
- A335470 counts (1,2,1)-matching compositions, ranks A335466.
- A335471 counts (1,2,1)-avoiding compositions, ranks A335467.
- A335472 counts (2,1,2)-matching compositions, ranks A335468.
- A335473 counts (2,1,2)-avoiding compositions, ranks A335469.
A373948 encodes run-compression using compositions in standard order.
A373949 counts compositions by run-compressed sum, opposite A373951.
A373953 gives run-compressed sum of standard compositions, excess A373954.

Programs

  • Mathematica
    stc[n_]:=Differences[Prepend[Join @@ Position[Reverse[IntegerDigits[n,2]],1],0]]//Reverse;
    Select[Range[0,100],Length[Split[stc[#]]] == Length[stc[#]]&&!UnsameQ@@First/@Split[stc[#]]&]

Formula

Equals A333489 /\ A374253.

A374703 Number of integer compositions of 2n whose leaders of weakly decreasing runs sum to n. Center n = 2*k of the triangle A374748.

Original entry on oeis.org

1, 1, 2, 9, 24, 96, 343, 1242, 4700, 17352, 65995
Offset: 0

Views

Author

Gus Wiseman, Aug 12 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(4) = 24 compositions:
  ()  (11)  (22)   (33)     (44)
            (211)  (321)    (422)
                   (1122)   (431)
                   (1221)   (1133)
                   (3111)   (1322)
                   (11112)  (1331)
                   (11121)  (4211)
                   (11211)  (11132)
                   (12111)  (11321)
                            (13211)
                            (21122)
                            (21221)
                            (22112)
                            (22121)
                            (41111)
                            (111113)
                            (111131)
                            (111311)
                            (113111)
                            (131111)
                            (211112)
                            (211121)
                            (211211)
                            (212111)
		

Crossrefs

For reversed partitions we have A364910.
For strictly decreasing runs we have the center of A374700.
Center n = 2*k of the triangle A374748.
A003242 counts anti-run compositions.
A011782 counts integer compositions.
A238130, A238279, A333755 count compositions by number of runs.
A274174 counts contiguous compositions, ranks A374249.

Programs

  • Mathematica
    Table[Length[Select[Join@@Permutations /@ IntegerPartitions[2n],Total[First/@Split[#,GreaterEqual]]==n&]],{n,0,8}]

A374705 Number of integer compositions of n whose leaders of maximal strictly increasing runs sum to 2.

Original entry on oeis.org

0, 0, 2, 0, 2, 3, 4, 7, 8, 14, 17, 27, 33, 48, 63, 84, 112, 147, 191, 248, 322, 409, 527, 666, 845, 1062, 1336, 1666, 2079, 2579, 3190, 3936, 4842, 5933, 7259, 8854, 10768, 13074, 15826, 19120, 23048, 27728, 33279, 39879, 47686, 56916, 67818, 80667, 95777, 113552, 134396
Offset: 0

Views

Author

Gus Wiseman, Aug 12 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) = 0 through a(9) = 14 compositions:
  .  .  (2)   .  (112)  (23)   (24)    (25)    (26)    (27)
        (11)     (121)  (113)  (114)   (115)   (116)   (117)
                        (131)  (141)   (151)   (161)   (171)
                               (1212)  (1123)  (1124)  (234)
                                       (1213)  (1214)  (1125)
                                       (1231)  (1241)  (1134)
                                       (1312)  (1313)  (1215)
                                               (1412)  (1251)
                                                       (1314)
                                                       (1341)
                                                       (1413)
                                                       (1512)
                                                       (12123)
                                                       (12312)
		

Crossrefs

For leaders of weakly decreasing runs we have A004526.
The case of strict compositions is A096749.
For leaders of anti-runs we have column k = 2 of A374521.
Leaders of strictly increasing runs in standard compositions are A374683.
Ranked by positions of 2s in A374684.
Column k = 2 of A374700.
A003242 counts anti-run compositions.
A011782 counts 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[#,Less]]==2&]],{n,0,15}]
  • PARI
    seq(n)={my(A=O(x^(n-1)), q=eta(x^2 + A)/eta(x + A)); Vec((q*x/(1 + x))^2 + q*x^2/((1 + x)*(1 + x^2)), -n-1)} \\ Andrew Howroyd, Aug 14 2024

Formula

G.f.: (x*Q(x)/(1 + x))^2 + x^2*Q(x)/((1 + x)*(1 + x^2)), where Q(x) is the g.f. of A000009. - Andrew Howroyd, Aug 14 2024

Extensions

a(26) onwards from Andrew Howroyd, Aug 14 2024

A375297 Number of integer compositions of n matching both of the dashed patterns 23-1 and 1-32.

Original entry on oeis.org

0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 6, 21, 68, 199, 545, 1410, 3530, 8557, 20255, 46968, 107135, 240927, 535379, 1177435, 2566618, 5551456
Offset: 0

Views

Author

Gus Wiseman, Aug 23 2024

Keywords

Comments

Also the number of integer compositions of n whose leaders of maximal weakly increasing runs are not weakly decreasing and whose reverse satisfies the same condition.

Examples

			The a(0) = 0 through a(11) = 21 compositions:
  .  .  .  .  .  .  .  .  .  (12321)  (1342)    (1352)
                                      (2431)    (2531)
                                      (12421)   (11342)
                                      (13231)   (12431)
                                      (112321)  (12521)
                                      (123211)  (13241)
                                                (13421)
                                                (14231)
                                                (23132)
                                                (24311)
                                                (112421)
                                                (113231)
                                                (122321)
                                                (123212)
                                                (123221)
                                                (124211)
                                                (132311)
                                                (212321)
                                                (1112321)
                                                (1123211)
                                                (1232111)
		

Crossrefs

For leaders of identical runs we have A332834.
For just one of the two conditions we have A374636, ranks A375137/A375138.
These compositions are ranked by A375407.
A003242 counts anti-runs, ranks A333489.
A011782 counts compositions.
A106356 counts compositions by number of maximal anti-runs.
A238130, A238279, A333755 count compositions by number of runs.
A274174 counts contiguous compositions, ranks A374249.
A335456 counts patterns matched by compositions.

Programs

  • Mathematica
    Table[Length[Select[Join@@Permutations/@IntegerPartitions[n], MatchQ[#,{_,y_,z_,_,x_,_}/;x_,x_,_,z_,y_,_}/;x
    				
Previous Showing 61-70 of 70 results.