A374640 -id:A374640 - cp's OEIS frontend

A374761 Number of integer compositions of n whose leaders of strictly decreasing runs are distinct.

1, 1, 1, 3, 5, 7, 13, 27, 45, 73, 117, 205, 365, 631, 1061, 1711, 2777, 4599, 7657, 12855, 21409, 35059, 56721, 91149, 146161, 234981, 379277, 612825, 988781, 1587635, 2533029, 4017951, 6342853, 9985087, 15699577, 24679859, 38803005, 60979839, 95698257, 149836255

Offset: 0

Gus Wiseman, Jul 29 2024

nonn

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.

			The composition (3,1,4,3,2,1,2,8) has strictly decreasing runs ((3,1),(4,3,2,1),(2),(8)), with leaders (3,4,2,8), so is counted under a(24).
The a(0) = 1 through a(6) = 13 compositions:
  ()  (1)  (2)  (3)   (4)    (5)    (6)
                (12)  (13)   (14)   (15)
                (21)  (31)   (23)   (24)
                      (121)  (32)   (42)
                      (211)  (41)   (51)
                             (131)  (123)
                             (311)  (132)
                                    (141)
                                    (213)
                                    (231)
                                    (312)
                                    (321)
                                    (411)

Gus Wiseman, Sequences counting and ranking compositions by their leaders (for six types of runs).

For leaders of identical runs we have A274174, ranked by A374249.
The weak opposite version is A374632, ranks A374768.
The opposite version is A374687, ranks A374698.
For identical instead of distinct leaders we have A374760, ranks A374759.
The weak version is A374743, ranks A374701.
Ranked by A374767.
For partitions instead of compositions we have A375133.
Other types of runs:
- For leaders of identical runs we have A000005 for n > 0, ranks A272919.
- For leaders of anti-runs we have A374518, ranked by A374638.
Other types of run-leaders:
- For strictly increasing leaders we have A374762.
- 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.
A373949 counts compositions by run-compressed sum, opposite A373951.
A374700 counts compositions by sum of leaders of strictly increasing runs.
Cf. A034296, A106356, A188920, A189076, A238343, A333213, A374517, A374631, A374640, A374686, A374742.

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

dfs(m, r, v) = 1 + sum(s=r, m, if(!setsearch(v, s), dfs(m-s, s, setunion(v, [s]))*x^s + sum(t=1, min(s-1, m-s), dfs(m-s-t, t, setunion(v, [s]))*x^(s+t)*prod(i=t+1, s-1, 1+x^i))));
lista(nn) = Vec(dfs(nn, 1, []) + O(x^(1+nn))); \\ Jinyuan Wang, Feb 13 2025

More terms from Jinyuan Wang, Feb 13 2025

A374517 Number of integer compositions of n whose leaders of anti-runs are identical.

Original entry on oeis.org

1, 1, 2, 4, 7, 13, 25, 46, 85, 160, 301, 561, 1056, 1984, 3730, 7037, 13273, 25056, 47382, 89666, 169833, 322038, 611128, 1160660, 2206219, 4196730, 7988731, 15217557, 29005987, 55321015, 105570219, 201569648, 385059094, 735929616, 1407145439, 2691681402

Offset: 0

Gus Wiseman, Aug 01 2024

nonn

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.

			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)  (131)
                                (212)
                                (221)
                                (1112)
                                (1121)
                                (1211)
                                (11111)

John Tyler Rascoe, Table of n, a(n) for n = 0..100
Gus Wiseman, Sequences counting and ranking compositions by their leaders (for six types of runs).

For partitions instead of compositions we have A034296 or A115029.
These compositions have ranks A374519.
The complement is counted by A374640.
Other types of runs (instead of anti-):
- For leaders of identical runs we have A000005 for n > 0, ranks A272919.
- For leaders of weakly increasing runs we have A374631, ranks A374633.
- For leaders of strictly increasing runs we have A374686, ranks A374685.
- For leaders of weakly decreasing runs we have A374742, ranks A374741.
- For leaders of strictly decreasing runs we have A374760, ranks A374759.
Other types of run-leaders (instead of identical):
- For distinct leaders we have A374518.
- For weakly increasing leaders we have A374681.
- For strictly increasing leaders we have A374679.
- For weakly decreasing leaders we have A374682.
- For strictly decreasing leaders we have 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.
Cf. A188920, A189076, A238343, A333213, A373949, A374515, A374518.

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

C_x(N) = {my(g =1/(1 - sum(k=1, N, x^k/(1+x^k))));g}
A_x(i,N) = {my(x='x+O('x^N), f=(x^i)*(C_x(N)*(x^i)+x^i+1)/(1+x^i)^2);f}
B_x(i,j,N) = {my(x='x+O('x^N), f=C_x(N)*x^(i+j)/((1+x^i)*(1+x^j)));f}
D_x(N) = {my(x='x+O('x^N), f=1+sum(i=1,N,-1+sum(j=0,N-i, A_x(i,N)^j)*(1-B_x(i,i,N)+sum(k=1,N-i,B_x(i,k,N)))));Vec(f)}
D_x(30) \\ John Tyler Rascoe, Aug 16 2024

G.f.: 1 + Sum_{i>0} (-1 + Sum_{j>=0} (A(i,x)^j)*(1 + Sum_{k>0, k<>i} (B(i,k,x)))) where A(i,x) = (x^i)*(C(x)*(x^i) + x^i + 1)/(1+x^i)^2, B(i,k,x) = C(x)*x^(i+k)/((1+x^i)*(1+x^k)), and C(x) is the g.f. for A003242. - John Tyler Rascoe, Aug 16 2024

a(26) onwards from John Tyler Rascoe, Aug 16 2024

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

Gus Wiseman, Jul 27 2024

nonn

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.

			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)

Andrew Howroyd, Table of n, a(n) for n = 0..1000
Gus Wiseman, Sequences counting and ranking compositions by their leaders (for six types of runs).

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.
Cf. A000009, A106356, A188920, A189076, A238343, A304969, A333213, A374632, A374634, A374635, A374640.

Table[Length[Select[Join @@ Permutations/@IntegerPartitions[n],SameQ@@First/@Split[#,Less]&]],{n,0,15}]

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

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

A374760 Number of integer compositions of n whose leaders of strictly decreasing runs are identical.

Original entry on oeis.org

1, 1, 2, 3, 4, 6, 8, 11, 15, 21, 28, 38, 52, 70, 95, 129, 173, 234, 318, 428, 579, 784, 1059, 1433, 1942, 2630, 3564, 4835, 6559, 8902, 12094, 16432, 22340, 30392, 41356, 56304, 76692, 104499, 142448, 194264, 265015, 361664, 493749, 674278, 921113, 1258717

Offset: 0

Gus Wiseman, Jul 29 2024

nonn

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.

			The composition (3,3,2,1,3,2,1) has strictly decreasing runs ((3),(3,2,1),(3,2,1)), with leaders (3,3,3), so is counted under a(15).
The a(0) = 1 through a(8) = 15 compositions:
  ()  (1)  (2)   (3)    (4)     (5)      (6)       (7)        (8)
           (11)  (21)   (22)    (32)     (33)      (43)       (44)
                 (111)  (31)    (41)     (42)      (52)       (53)
                        (1111)  (212)    (51)      (61)       (62)
                                (221)    (222)     (313)      (71)
                                (11111)  (321)     (331)      (323)
                                         (2121)    (421)      (332)
                                         (111111)  (2122)     (431)
                                                   (2212)     (521)
                                                   (2221)     (2222)
                                                   (1111111)  (3131)
                                                              (21212)
                                                              (21221)
                                                              (22121)
                                                              (11111111)

Andrew Howroyd, Table of n, a(n) for n = 0..1000
Gus Wiseman, Sequences counting and ranking compositions by their leaders (for six types of runs).

For partitions instead of compositions we have A034296.
The weak version is A374742, ranks A374744.
The opposite version is A374686, ranks A374685.
The weak opposite version is A374631, ranks A374633.
Ranked by A374759.
Other types of runs (instead of strictly decreasing):
- For leaders of identical runs we have A000005 for n > 0, ranks A272919.
- For leaders of anti-runs we have A374517, ranks A374519.
Other types of run-leaders (instead of identical):
- 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.
- 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.
Cf. A000009, A106356, A188920, A189076, A238343, A261982, A333213, A374632, A374634, A374635, A374640, A374761.

Table[Length[Select[Join @@ Permutations/@IntegerPartitions[n],SameQ@@First/@Split[#,Greater]&]],{n,0,15}]

seq(n) = Vec(1 + sum(k=1, n, 1/(1 - x^k*prod(j=1, min(n-k,k-1), 1 + x^j, 1 + O(x^(n-k+1))))-1)) \\ Andrew Howroyd, Jul 31 2024

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

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

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

Original entry on oeis.org

1, 1, 1, 3, 3, 6, 10, 13, 21, 32, 48, 66, 101, 144, 207, 298, 415, 592, 833, 1163, 1615, 2247, 3088, 4259, 5845, 7977, 10862, 14752, 19969, 26941, 36310, 48725, 65279, 87228, 116274, 154660, 205305, 271879, 359400, 474157, 624257, 820450, 1076357, 1409598

Offset: 0

Gus Wiseman, Jul 27 2024

nonn

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. The weakly decreasing version is A374697.

			The a(0) = 1 through a(8) = 21 compositions:
  ()  (1)  (2)  (3)   (4)   (5)    (6)    (7)    (8)
                (12)  (13)  (14)   (15)   (16)   (17)
                (21)  (31)  (23)   (24)   (25)   (26)
                            (32)   (42)   (34)   (35)
                            (41)   (51)   (43)   (53)
                            (212)  (123)  (52)   (62)
                                   (213)  (61)   (71)
                                   (231)  (124)  (125)
                                   (312)  (214)  (134)
                                   (321)  (241)  (215)
                                          (313)  (251)
                                          (412)  (314)
                                          (421)  (323)
                                                 (341)
                                                 (413)
                                                 (431)
                                                 (512)
                                                 (521)
                                                 (2123)
                                                 (2312)
                                                 (3212)

Andrew Howroyd, Table of n, a(n) for n = 0..1000
Gus Wiseman, Sequences counting and ranking compositions by their leaders (for six types of runs).

The weak version appears to be A189076.
Ranked by positions of strictly decreasing rows in A374683.
The opposite version is A374762.
Types of runs (instead of strictly increasing):
- For leaders of identical runs we have A000041.
- For leaders of anti-runs we have A374680.
- 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.
Types of run-leaders (instead of strictly decreasing):
- For identical leaders we have A374686, ranks A374685.
- For distinct leaders we have A374687, ranks A374698.
- For strictly increasing leaders we have A374688.
- 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.
A374700 counts compositions by sum of leaders of strictly increasing runs.
Cf. A000009, A106356, A238343, A261982, A304969, A333213, A374632, A374635, A374640, A374679.

Table[Length[Select[Join@@Permutations /@ IntegerPartitions[n],Greater@@First/@Split[#,Less]&]],{n,0,15}]

C_x(N) = {my(x='x+O('x^N), h=prod(i=1,N, 1+(x^i)*prod(j=i+1,N, 1+x^j))); Vec(h)}
C_x(50) \\ John Tyler Rascoe, Jul 29 2024

G.f.: Product_{i>0} (1 + (x^i)*Product_{j>i} (1 + x^j)). - John Tyler Rascoe, Jul 29 2024

a(26) onwards from John Tyler Rascoe, Jul 29 2024

A374678 Number of integer compositions of n whose leaders of maximal anti-runs are not distinct.

Original entry on oeis.org

0, 0, 1, 1, 3, 7, 15, 32, 70, 144, 311, 653, 1354, 2820, 5850, 12054, 24810, 50923, 104206, 212841, 433919, 882930, 1793810, 3639248, 7373539, 14921986

Offset: 0

Gus Wiseman, Aug 06 2024

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.

			The anti-runs of y = (1,1,2,2) are ((1),(1,2),(2)) with leaders (1,1,2) so y is counted under a(6).
The a(0) = 0 through a(6) = 15 compositions:
  .  .  (11)  (111)  (22)    (113)    (33)
                     (112)   (221)    (114)
                     (1111)  (1112)   (222)
                             (1121)   (1113)
                             (1211)   (1122)
                             (2111)   (1131)
                             (11111)  (1311)
                                      (2211)
                                      (3111)
                                      (11112)
                                      (11121)
                                      (11211)
                                      (12111)
                                      (21111)
                                      (111111)

Gus Wiseman, Sequences counting and ranking compositions by their leaders (for six types of runs).

For constant runs we have A335548, complement A274174, ranks A374249.
The complement is counted by A374518, ranks A374638.
For weakly increasing runs we have complement A374632, ranks A374768.
Compositions of this type are ranked by A374639.
For identical instead of distinct leaders we have A374640, ranks A374520, complement A374517, ranks A374519.
A003242 counts anti-runs, ranks A333489.
A065120 gives leaders of standard compositions.
A106356 counts compositions by number of maximal anti-runs.
A238279 counts compositions by number of maximal runs
A274174 counts contiguous compositions, ranks A374249.
Cf. A034296, A188920, A189076, A238343, A239955, A333213, A373949, A374515.

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

A374520 Numbers k such that the leaders of maximal anti-runs in the k-th composition in standard order (A066099) are not identical.

Original entry on oeis.org

11, 19, 23, 26, 35, 39, 43, 46, 47, 53, 58, 67, 71, 74, 75, 78, 79, 83, 87, 91, 92, 93, 94, 95, 100, 106, 107, 117, 122, 131, 135, 138, 139, 142, 143, 147, 149, 151, 154, 155, 156, 157, 158, 159, 163, 164, 167, 171, 174, 175, 179, 183, 184, 185, 186, 187, 188

Offset: 1

Gus Wiseman, Aug 06 2024

nonn

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.

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.

			The sequence together with corresponding compositions begins:
  11: (2,1,1)
  19: (3,1,1)
  23: (2,1,1,1)
  26: (1,2,2)
  35: (4,1,1)
  39: (3,1,1,1)
  43: (2,2,1,1)
  46: (2,1,1,2)
  47: (2,1,1,1,1)
  53: (1,2,2,1)
  58: (1,1,2,2)
  67: (5,1,1)
  71: (4,1,1,1)
  74: (3,2,2)
  75: (3,2,1,1)
  78: (3,1,1,2)
  79: (3,1,1,1,1)
  83: (2,3,1,1)
  87: (2,2,1,1,1)
  91: (2,1,2,1,1)

Gus Wiseman, Sequences counting and ranking compositions by their leaders (for six types of runs).

For leaders of maximal constant runs we have the complement of A272919.
Positions of non-constant rows in A374515.
The complement is A374519, counted by A374517.
For distinct instead of identical leaders we have A374639, counted by A374678, complement A374638, counted by A374518.
Compositions of this type are counted by A374640.
A065120 gives leaders of standard compositions.
A106356 counts compositions by number of maximal anti-runs.
A238279 counts compositions by number of maximal runs
All of the following pertain to compositions in standard order:
- Length is A000120.
- Sum is A029837(n+1).
- Parts are listed by A066099.
- Number of adjacent equal pairs is A124762, unequal A333382.
- Anti-runs are ranked by A333489, counted by A003242.
- Run-length transform is A333627, sum A070939.
- Run-compression transform is A373948, sum A373953, excess A373954.
- Ranks of contiguous compositions are A374249, counted by A274174.
Six types of maximal runs:
- Count: A124766, A124765, A124768, A124769, A333381, A124767.
- Leaders: A374629, A374740, A374683, A374757, A374515, A374251.
- Rank: A375123, A375124, A375125, A375126, A375127, A373948.
Cf. A029931, A228351, A233564, A238343, A238424, A333213, A373949.

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

A374639 Numbers k such that the leaders of maximal anti-runs in the k-th composition in standard order (A066099) are not distinct.

Original entry on oeis.org

3, 7, 10, 14, 15, 21, 23, 27, 28, 29, 30, 31, 36, 39, 42, 43, 47, 51, 55, 56, 57, 58, 59, 60, 61, 62, 63, 71, 73, 79, 84, 85, 86, 87, 90, 94, 95, 99, 103, 106, 107, 110, 111, 112, 113, 114, 115, 116, 117, 118, 119, 120, 121, 122, 123, 124, 125, 126, 127, 135

Offset: 1

Gus Wiseman, Aug 06 2024

nonn

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.

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.

			The sequence of terms together with the corresponding compositions begins:
   3: (1,1)
   7: (1,1,1)
  10: (2,2)
  14: (1,1,2)
  15: (1,1,1,1)
  21: (2,2,1)
  23: (2,1,1,1)
  27: (1,2,1,1)
  28: (1,1,3)
  29: (1,1,2,1)
  30: (1,1,1,2)
  31: (1,1,1,1,1)

First differs from A335466 in lacking 166, complement A335467.
The complement for leaders of identical runs is A374249, counted by A274174.
For leaders of identical runs we have A374253, counted by A335548.
Positions of non-distinct (or non-strict) rows in A374515.
The complement is A374638, counted by A374518.
For identical instead of non-distinct we have A374519, counted by A374517.
For identical instead of distinct we have A374520, counted by A374640.
Compositions of this type are counted by A374678.
Other functional neighbors are A374768, A374698, A374701, A374767.
A065120 gives leaders of standard compositions.
A106356 counts compositions by number of maximal anti-runs.
A238279 counts compositions by number of maximal runs
All of the following pertain to compositions in standard order:
- Length is A000120.
- Sum is A029837(n+1).
- Parts are listed by A066099.
- Number of adjacent equal pairs is A124762, unequal A333382.
- Anti-runs are ranked by A333489, counted by A003242.
- Run-length transform is A333627, sum A070939.
- Run-compression transform is A373948, sum A373953, excess A373954.
Six types of maximal runs:
- Count: A124766, A124765, A124768, A124769, A333381, A124767.
- Leaders: A374629, A374740, A374683, A374757, A374515, A374251.
- Rank: A375123, A375124, A375125, A375126, A375127, A373948.
Cf. A029931, A114994, A228351, A233564, A238343, A272919, A335466, A373949.

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

A375397 Numbers divisible by the square of some prime factor other than the least. Non-hooklike numbers.

Original entry on oeis.org

18, 36, 50, 54, 72, 75, 90, 98, 100, 108, 126, 144, 147, 150, 162, 180, 196, 198, 200, 216, 225, 234, 242, 245, 250, 252, 270, 288, 294, 300, 306, 324, 338, 342, 350, 360, 363, 375, 378, 392, 396, 400, 414, 432, 441, 450, 468, 484, 486, 490, 500, 504, 507, 522

Offset: 1

Gus Wiseman, Aug 16 2024

nonn

Contains no squarefree numbers A005117 or prime powers A000961, but some perfect powers A131605.
Also numbers k such that the minima of the maximal anti-runs in the weakly increasing sequence of prime factors of k (with multiplicity) are not identical. Here, an anti-run is a sequence with no adjacent equal parts, and the minima of the 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.
Includes all terms of A036785 = non-products of a squarefree number and a prime power.
The asymptotic density of this sequence is 1 - (1/zeta(2)) * (1 + Sum_{p prime} (1/(p^2-p)) / Product_{primes q <= p} (1 + 1/q)) = 0.11514433883... . - Amiram Eldar, Oct 26 2024

			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 terms together with their prime indices begin:
    18: {1,2,2}
    36: {1,1,2,2}
    50: {1,3,3}
    54: {1,2,2,2}
    72: {1,1,1,2,2}
    75: {2,3,3}
    90: {1,2,2,3}
    98: {1,4,4}
   100: {1,1,3,3}
   108: {1,1,2,2,2}
   126: {1,2,2,4}
   144: {1,1,1,1,2,2}

Amiram Eldar, Table of n, a(n) for n = 1..10000

A superset of A036785.
The complement for maxima is A065200, counted by A034296.
For maxima instead of minima we have A065201, counted by A239955.
A version for compositions is A374520, counted by A374640.
Also positions of non-constant rows in A375128, sums A374706, ranks A375400.
The complement is A375396, counted by A115029.
The complement for distinct minima is A375398, counted by A375134.
For distinct instead of identical minima we have A375399, counts A375404.
Partitions of this type are counted by A375405.
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.
Cf. A000005, A013661, A046660, A272919, A319066, A358905, A374686, A374704, A374742, A375133, A375136, A375401.

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

is(k) = if(k > 1, my(e = factor(k)[, 2]); vecprod(e) > e[1], 0); \\ Amiram Eldar, Oct 26 2024

Name edited by Peter Munn, May 08 2025

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

Gus Wiseman, Aug 06 2024

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.

			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)

Gus Wiseman, Sequences counting and ranking compositions by their leaders (for six types of runs).

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.
Cf. A115029, A238343, A333213, A373949, A374515, A374632, A374635, A374700.

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

cp's OEIS Frontend

A374761 Number of integer compositions of n whose leaders of strictly decreasing runs are distinct.

Views

Author

Keywords

Comments

Examples

Links

Crossrefs

Programs

Mathematica

PARI

Extensions

A374517 Number of integer compositions of n whose leaders of anti-runs are identical.

Views

Author

Keywords

Comments

Examples

Links

Crossrefs

Programs

Mathematica

PARI

Formula

Extensions

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

Views

Author

Keywords

Comments

Examples

Links

Crossrefs

Programs

Mathematica

PARI

Extensions

A374760 Number of integer compositions of n whose leaders of strictly decreasing runs are identical.

Views

Author

Keywords

Comments

Examples

Links

Crossrefs

Programs

Mathematica

PARI

Formula

Extensions

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

Views

Author

Keywords

Comments

Examples

Links

Crossrefs

Programs

Mathematica

PARI

Formula

Extensions

A374678 Number of integer compositions of n whose leaders of maximal anti-runs are not distinct.

Views

Author

Keywords

Comments

Examples

Links

Crossrefs

Programs

Mathematica

A374520 Numbers k such that the leaders of maximal anti-runs in the k-th composition in standard order (A066099) are not identical.

Views

Author

Keywords

Comments

Examples