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-2 of 2 results.

A374636 Number of integer compositions of n whose leaders of maximal weakly increasing runs are not weakly decreasing.

Original entry on oeis.org

0, 0, 0, 0, 0, 0, 1, 3, 10, 28, 72, 178, 425, 985, 2237, 4999, 11016, 24006, 51822, 110983, 236064, 499168, 1050118, 2199304, 4587946, 9537506, 19765213, 40847186, 84205453, 173198096, 355520217, 728426569, 1489977348, 3043054678, 6206298312, 12641504738
Offset: 0

Views

Author

Gus Wiseman, Aug 09 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.
Also the number of integer compositions of n matching the dashed pattern 1-32, ranked by A375137.
Also the number of integer compositions of n matching the dashed pattern 23-1, ranked by A375138.

Examples

			- The maximal weakly increasing runs of y = (1,1,3,2,1) are ((1,1,3),(2),(1)) with leaders (1,2,1) so y is counted under a(8). Also, y matches 1-32 and avoids 23-1.
- The maximal weakly increasing runs of y = (1,3,2,1,1) are ((1,3),(2),(1,1)) with leaders (1,2,1) so y is counted under a(8). Also, y matches 1-32 and avoids 23-1.
- The maximal weakly increasing runs of y = (2,3,1,1,1) are ((2,3),(1,1,1)) with leaders (2,1) so y is not counted under a(8). Also, y avoids 1-32 and matches 23-1.
- The maximal weakly increasing runs of y = (2,3,2,1) are ((2,3),(2),(1)) with leaders (2,2,1) so y is not counted under a(8). Also, y avoids 1-32 and matches 23-1.
- The maximal weakly increasing runs of y = (2,1,3,1,1) are ((2),(1,3),(1,1)) with leaders (2,1,1) so y is not counted under a(8). Also, y avoids both 1-32 and 23-1.
- The maximal weakly increasing runs of y = (2,1,1,3,1) are ((2),(1,1,3),(1)) with leaders (2,1,1) so y is not counted under a(8). Also, y avoids both 1-32 and 23-1.
The a(0) = 0 through a(8) = 10 compositions:
  .  .  .  .  .  .  (132)  (142)   (143)
                           (1132)  (152)
                           (1321)  (1142)
                                   (1232)
                                   (1322)
                                   (1421)
                                   (2132)
                                   (11132)
                                   (11321)
                                   (13211)
		

Crossrefs

The reverse version is the same.
For leaders of identical runs we have A056823.
The complement is counted by A189076.
The non-dashed version is A335514.
For leaders of anti-runs we have A374699, complement A374682.
For weakly decreasing runs we have the complement of A374747.
For leaders of strictly increasing runs we have A375135, complement A374697.
These compositions are ranked by A375137, reverse A375138.
A003242 counts anti-runs, ranks A333489.
A106356 counts compositions by number of maximal anti-runs.
A238279 counts compositions by number of maximal runs
A274174 counts contiguous compositions, ranks A374249.

Programs

  • Mathematica
    Table[Length[Select[Join@@Permutations /@ IntegerPartitions[n],!GreaterEqual@@First/@Split[#,LessEqual]&]],{n,0,15}]
    (* or *)
    Table[Length[Select[Join@@Permutations/@IntegerPartitions[n],MatchQ[#,{_,y_,z_,_,x_,_}/;x
    				

Formula

a(n) = A011782(n) - A189076(n). - Jinyuan Wang, Feb 14 2025

Extensions

More terms from Jinyuan Wang, Feb 14 2025

A375407 Numbers k such that the k-th composition in standard order (row k of A066099) matches both of the dashed patterns 23-1 and 1-32.

Original entry on oeis.org

421, 649, 802, 809, 837, 843, 933, 1289, 1299, 1330, 1445, 1577, 1602, 1605, 1617, 1619, 1669, 1673, 1675, 1685, 1686, 1687, 1701, 1826, 1833, 1861, 1867, 1957, 2469, 2569, 2577, 2579, 2597, 2598, 2599, 2610, 2658, 2661, 2674, 2697, 2850, 2857, 2885, 2891
Offset: 1

Views

Author

Gus Wiseman, Aug 23 2024

Keywords

Comments

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.
These are also numbers k such that:
(1) the maximal weakly increasing runs in the reverse of the k-th composition in standard order do not have weakly decreasing leaders, and
(2) the maximal weakly increasing runs in the k-th composition in standard order do not have weakly decreasing leaders.

Examples

			Composition 89 is (2,1,3,1), which matches 2-3-1 but not 23-1.
Composition 165 is (2,3,2,1), which matches 23-1 but not 231.
Composition 358 is (2,1,3,1,2), which matches 2-3-1 and 1-3-2 but not 23-1 or 1-32.
The sequence together with corresponding compositions begins:
   421: (1,2,3,2,1)
   649: (2,4,3,1)
   802: (1,3,4,2)
   809: (1,3,2,3,1)
   837: (1,2,4,2,1)
   843: (1,2,3,2,1,1)
   933: (1,1,2,3,2,1)
  1289: (2,5,3,1)
  1299: (2,4,3,1,1)
  1330: (2,3,1,3,2)
  1445: (2,1,2,3,2,1)
  1577: (1,4,2,3,1)
  1602: (1,3,5,2)
  1605: (1,3,4,2,1)
  1617: (1,3,2,4,1)
  1619: (1,3,2,3,1,1)
		

Crossrefs

The non-dashed version is the intersection of A335482 and A335480.
Compositions of this type are counted by A375297.
For leaders of identical runs we have A375408, counted by A332834.
A003242 counts anti-runs, ranks A333489.
A011782 counts compositions.
A238130, A238279, A333755 count compositions by number of runs.
A335486 ranks compositions matching 21, reverse A335485.
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,1000],MatchQ[stc[#],{_,y_,z_,_,x_,_}/;x_,x_,_,z_,y_,_}/;x
    				

Formula

Intersection of A375138 and A375137.
Showing 1-2 of 2 results.