A374744
Numbers k such that the leaders of weakly decreasing runs in the k-th composition in standard order (A066099) are identical.
Original entry on oeis.org
0, 1, 2, 3, 4, 5, 7, 8, 9, 10, 11, 15, 16, 17, 18, 19, 21, 22, 23, 31, 32, 33, 34, 35, 36, 37, 39, 42, 43, 45, 46, 47, 63, 64, 65, 66, 67, 68, 69, 71, 73, 74, 75, 76, 79, 85, 86, 87, 90, 91, 93, 94, 95, 127, 128, 129, 130, 131, 132, 133, 135, 136, 137, 138
Offset: 1
The terms together with the corresponding compositions begin:
0: ()
1: (1)
2: (2)
3: (1,1)
4: (3)
5: (2,1)
7: (1,1,1)
8: (4)
9: (3,1)
10: (2,2)
11: (2,1,1)
15: (1,1,1,1)
16: (5)
17: (4,1)
18: (3,2)
19: (3,1,1)
21: (2,2,1)
22: (2,1,2)
23: (2,1,1,1)
31: (1,1,1,1,1)
For distinct (instead of identical) leaders we have
A374701, count
A374743.
Compositions of this type are counted by
A374742.
A374748 counts compositions by sum of leaders of weakly decreasing runs.
All of the following pertain to compositions in standard order:
-
stc[n_]:=Differences[Prepend[Join @@ Position[Reverse[IntegerDigits[n,2]],1],0]]//Reverse;
Select[Range[0,100],SameQ@@First/@Split[stc[#],GreaterEqual]&]
A374748
Triangle read by rows where T(n,k) is the number of integer compositions of n whose leaders of weakly decreasing runs sum to k.
Original entry on oeis.org
1, 0, 1, 0, 1, 1, 0, 1, 1, 2, 0, 1, 2, 3, 2, 0, 1, 2, 6, 4, 3, 0, 1, 3, 9, 8, 7, 4, 0, 1, 3, 13, 15, 16, 11, 5, 0, 1, 4, 17, 24, 32, 28, 16, 6, 0, 1, 4, 23, 36, 58, 58, 44, 24, 8, 0, 1, 5, 28, 52, 96, 115, 100, 71, 34, 10, 0, 1, 5, 35, 72, 151, 203, 211, 176, 109, 49, 12
Offset: 0
Triangle begins:
1
0 1
0 1 1
0 1 1 2
0 1 2 3 2
0 1 2 6 4 3
0 1 3 9 8 7 4
0 1 3 13 15 16 11 5
0 1 4 17 24 32 28 16 6
0 1 4 23 36 58 58 44 24 8
0 1 5 28 52 96 115 100 71 34 10
0 1 5 35 72 151 203 211 176 109 49 12
Row n = 6 counts the following compositions:
. (111111) (222) (33) (42) (51) (6)
(2211) (321) (411) (141) (15)
(21111) (3111) (132) (114) (24)
(1221) (1311) (312) (123)
(1122) (1131) (231)
(12111) (1113) (213)
(11211) (2121) (1212)
(11121) (2112)
(11112)
For length instead of sum we have
A238343.
Types of runs (instead of weakly decreasing):
- For leaders of constant 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 strictly decreasing runs we have
A374766.
Types of run-leaders:
- For weakly increasing leaders we appear to have
A188900.
- For strictly decreasing leaders we have
A374746.
- For weakly decreasing leaders we have
A374747.
A003242 counts anti-run compositions.
A335456 counts patterns matched by compositions.
-
Table[Length[Select[Join@@Permutations /@ IntegerPartitions[n],Total[First/@Split[#,GreaterEqual]]==k&]],{n,0,15},{k,0,n}]
A375124
Weakly decreasing run-leader transformation for standard compositions.
Original entry on oeis.org
0, 1, 2, 1, 4, 2, 6, 1, 8, 4, 2, 2, 12, 6, 6, 1, 16, 8, 4, 4, 20, 2, 10, 2, 24, 12, 6, 6, 12, 6, 6, 1, 32, 16, 8, 8, 4, 4, 18, 4, 40, 20, 2, 2, 20, 10, 10, 2, 48, 24, 12, 12, 52, 6, 26, 6, 24, 12, 6, 6, 12, 6, 6, 1, 64, 32, 16, 16, 8, 8, 34, 8, 72, 4, 4, 4, 36
Offset: 0
The 813th composition in standard order is (1,3,2,1,2,1), with weakly decreasing runs ((1),(3,2,1),(2,1)), with leaders (1,3,2). This is the 50th composition in standard order, so a(813) = 50.
The strict opposite version is
A375125.
All of the following pertain to compositions in standard order:
- Run-sum transformation is
A353847.
Six types of runs:
-
stc[n_]:=Differences[Prepend[Join @@ Position[Reverse[IntegerDigits[n,2]],1],0]]//Reverse;
stcinv[q_]:=Total[2^(Accumulate[Reverse[q]])]/2;
Table[stcinv[First/@Split[stc[n],GreaterEqual]],{n,0,100}]
A375125
Strictly increasing run-leader transformation for standard compositions.
Original entry on oeis.org
0, 1, 2, 3, 4, 5, 1, 7, 8, 9, 10, 11, 1, 3, 3, 15, 16, 17, 18, 19, 2, 21, 5, 23, 1, 3, 6, 7, 3, 7, 7, 31, 32, 33, 34, 35, 36, 37, 9, 39, 2, 5, 42, 43, 5, 11, 11, 47, 1, 3, 6, 7, 1, 13, 3, 15, 3, 7, 14, 15, 7, 15, 15, 63, 64, 65, 66, 67, 68, 69, 17, 71, 4, 73
Offset: 0
The 813th composition in standard order is (1,3,2,1,2,1), with strictly increasing runs ((1,3),(2),(1,2),(1)), with leaders (1,2,1,1). This is the 27th composition in standard order, so a(813) = 27.
The weak opposite version is
A375124.
All of the following pertain to compositions in standard order:
- Run-sum transformation is
A353847.
Six types of runs:
Cf.
A065120,
A106356,
A189076,
A238343,
A333213,
A373949,
A374634,
A374635,
A374684,
A374700,
A375128.
-
stc[n_]:=Differences[Prepend[Join @@ Position[Reverse[IntegerDigits[n,2]],1],0]]//Reverse;
stcinv[q_]:=Total[2^(Accumulate[Reverse[q]])]/2;
Table[stcinv[First/@Split[stc[n],Less]],{n,0,100}]
A375126
Strictly decreasing run-leader transformation for standard compositions.
Original entry on oeis.org
0, 1, 2, 3, 4, 2, 6, 7, 8, 4, 10, 5, 12, 6, 14, 15, 16, 8, 4, 9, 20, 10, 10, 11, 24, 12, 26, 13, 28, 14, 30, 31, 32, 16, 8, 17, 36, 4, 18, 19, 40, 20, 42, 21, 20, 10, 22, 23, 48, 24, 12, 25, 52, 26, 26, 27, 56, 28, 58, 29, 60, 30, 62, 63, 64, 32, 16, 33, 8, 8
Offset: 0
The 813th composition in standard order is (1,3,2,1,2,1), with strictly decreasing runs ((1),(3,2,1),(2,1)), with leaders (1,3,2). This is the 50th composition in standard order, so a(813) = 50.
The weak opposite version is
A375123.
All of the following pertain to compositions in standard order:
- Run-sum transformation is
A353847.
Six types of runs:
Cf.
A065120,
A106356,
A188920,
A238343,
A333213,
A373949,
A374634,
A374685,
A374744,
A374766,
A375128.
-
stc[n_]:=Differences[Prepend[Join @@ Position[Reverse[IntegerDigits[n,2]],1],0]]//Reverse;
stcinv[q_]:=Total[2^(Accumulate[Reverse[q]])]/2;
Table[stcinv[First/@Split[stc[n],Greater]],{n,0,100}]
A375127
The anti-run-leader transformation for standard compositions.
Original entry on oeis.org
0, 1, 2, 3, 4, 2, 1, 7, 8, 4, 10, 5, 1, 1, 3, 15, 16, 8, 4, 9, 2, 10, 2, 11, 1, 1, 6, 3, 3, 3, 7, 31, 32, 16, 8, 17, 36, 4, 4, 19, 2, 2, 42, 21, 2, 2, 5, 23, 1, 1, 1, 3, 1, 6, 1, 7, 3, 3, 14, 7, 7, 7, 15, 63, 64, 32, 16, 33, 8, 8, 8, 35, 4, 36, 18, 9, 4, 4, 9
Offset: 0
The 346th composition in standard order is (2,2,1,2,2), with anti-runs ((2),(2,1,2),(2)), with leaders (2,2,2). This is the 42nd composition in standard order, so a(346) = 42.
All of the following pertain to compositions in standard order:
Six types of runs:
Cf.
A065120,
A106356,
A188920,
A238343,
A333213,
A373949,
A374516,
A374521,
A374685,
A374698,
A374701,
A374767.
-
stc[n_]:=Differences[Prepend[Join @@ Position[Reverse[IntegerDigits[n,2]],1],0]]//Reverse;
stcinv[q_]:=Total[2^(Accumulate[Reverse[q]])]/2;
Table[stcinv[First/@Split[stc[n],UnsameQ]],{n,0,100}]
A376306
Run-lengths of the sequence of first differences of squarefree numbers.
Original entry on oeis.org
2, 1, 2, 1, 1, 1, 2, 3, 2, 2, 2, 1, 2, 1, 2, 1, 2, 1, 1, 1, 3, 2, 1, 1, 1, 2, 1, 2, 1, 1, 1, 2, 1, 1, 1, 2, 3, 2, 1, 1, 2, 1, 2, 1, 2, 1, 2, 1, 1, 1, 1, 1, 1, 2, 1, 1, 1, 2, 1, 2, 1, 1, 1, 1, 1, 1, 1, 2, 3, 2, 2, 1, 1, 2, 1, 2, 1, 2, 1, 1, 1, 2, 3, 2, 1, 1, 1
Offset: 1
The sequence of squarefree numbers (A005117) is:
1, 2, 3, 5, 6, 7, 10, 11, 13, 14, 15, 17, 19, 21, 22, 23, 26, 29, 30, ...
The sequence of first differences (A076259) of squarefree numbers is:
1, 1, 2, 1, 1, 3, 1, 2, 1, 1, 2, 2, 2, 1, 1, 3, 3, 1, 1, 2, 1, 1, 2, 1, ...
with runs:
(1,1),(2),(1,1),(3),(1),(2),(1,1),(2,2,2),(1,1),(3,3),(1,1),(2),(1,1), ...
with lengths A376306 (this sequence).
Run-lengths of first differences of
A005117.
For prime instead of squarefree numbers we have
A333254.
For compression instead of run-lengths we have
A376305.
For run-sums instead of run-lengths we have
A376307.
For prime-powers instead of squarefree numbers we have
A376309.
For positions of first appearances instead of run-lengths we have
A376311.
A116861 counts partitions by compressed sum, by compressed length
A116608.
Cf.
A007674,
A053797,
A053806,
A061398,
A072284,
A112925,
A112926,
A120992,
A373198,
A375707,
A376312.
A376312
Run-compression of first differences (A078147) of nonsquarefree numbers (A013929).
Original entry on oeis.org
4, 1, 3, 4, 2, 4, 1, 2, 1, 4, 1, 3, 1, 2, 4, 3, 1, 4, 3, 1, 4, 1, 3, 4, 2, 4, 2, 1, 4, 1, 3, 1, 3, 1, 2, 4, 3, 1, 4, 3, 1, 2, 1, 3, 4, 2, 4, 1, 2, 1, 3, 1, 4, 1, 3, 4, 2, 4, 3, 1, 4, 1, 3, 4, 2, 4, 2, 1, 3, 2, 4, 1, 3, 4, 2, 3, 1, 3, 1, 4, 1, 3, 2, 1, 3, 4, 2
Offset: 1
The sequence of nonsquarefree numbers (A013929) is:
4, 8, 9, 12, 16, 18, 20, 24, 25, 27, 28, 32, 36, 40, 44, 45, 48, 49, 50, ...
with first differences (A078147):
4, 1, 3, 4, 2, 2, 4, 1, 2, 1, 4, 4, 4, 4, 1, 3, 1, 1, 2, 2, 2, 4, 3, 1, ...
with runs:
(4),(1),(3),(4),(2,2),(4),(1),(2),(1),(4,4,4,4),(1),(3),(1,1),(2,2,2), ...
and run-compression (A376312):
4, 1, 3, 4, 2, 4, 1, 2, 1, 4, 1, 3, 1, 2, 4, 3, 1, 4, 3, 1, 4, 1, 3, 4, ...
For nonprime instead of squarefree numbers we have
A037201, halved
A373947.
For run-sums instead of compression we have
A376264.
For squarefree instead of nonsquarefree we have
A376305, ones
A376342.
For prime-powers instead of nonsquarefree numbers we have
A376308.
A116861 counts partitions by compressed sum, by compressed length
A116608.
Cf.
A007674,
A053797,
A053806,
A072284,
A112925,
A120992,
A274174,
A373198,
A375707,
A376306,
A376307,
A376311.
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
- 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)
The reverse version is the same.
For leaders of identical runs we have
A056823.
The complement is counted by
A189076.
For weakly decreasing runs we have the complement of
A374747.
For leaders of strictly increasing runs we have
A375135, complement
A374697.
A106356 counts compositions by number of maximal anti-runs.
A238279 counts compositions by number of maximal runs
Cf.
A000041,
A188920,
A238343,
A238424,
A333213,
A373949,
A374632,
A374635,
A374678,
A374681,
A375297.
-
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
A374758
Sum of leaders of strictly decreasing runs in the n-th composition in standard order.
Original entry on oeis.org
0, 1, 2, 2, 3, 2, 3, 3, 4, 3, 4, 3, 4, 3, 4, 4, 5, 4, 3, 4, 5, 4, 4, 4, 5, 4, 5, 4, 5, 4, 5, 5, 6, 5, 4, 5, 6, 3, 5, 5, 6, 5, 6, 5, 5, 4, 5, 5, 6, 5, 4, 5, 6, 5, 5, 5, 6, 5, 6, 5, 6, 5, 6, 6, 7, 6, 5, 6, 4, 4, 6, 6, 7, 6, 5, 4, 6, 5, 6, 6, 7, 6, 5, 6, 7, 6, 6
Offset: 0
The maximal strictly decreasing subsequences of the 1234567th composition in standard order are ((3,2,1),(2),(2,1),(2),(5,1),(1),(1)) with leaders (3,2,2,2,5,1,1), so a(1234567) = 16.
For leaders of constant runs we have
A373953.
For leaders of anti-runs we have
A374516.
For leaders of weakly increasing runs we have
A374630.
For length instead of sum we have
A124769.
The case of partitions ranked by Heinz numbers is
A374706.
All of the following pertain to compositions in standard order:
- Run-compression transform is
A373948.
- Ranks of non-contiguous compositions are
A374253, counted by
A335548.
Six types of runs:
Cf.
A106356,
A188920,
A189076,
A233564,
A238343,
A272919,
A333213,
A373949,
A374700,
A374759,
A374761,
A374767.
-
stc[n_]:=Differences[Prepend[Join @@ Position[Reverse[IntegerDigits[n,2]],1],0]]//Reverse;
Table[Total[First/@Split[stc[n],Greater]],{n,0,100}]
Comments