A333191
Number of compositions of n whose run-lengths are either strictly increasing or strictly decreasing.
Original entry on oeis.org
1, 1, 2, 2, 5, 8, 10, 18, 24, 29, 44, 60, 68, 100, 130, 148, 201, 256, 310, 396, 478, 582, 736, 898, 1068, 1301, 1594, 1902, 2288, 2750, 3262, 3910, 4638, 5510, 6538, 7686, 9069, 10670, 12560, 14728, 17170, 20090, 23462, 27292, 31710, 36878, 42704, 49430
Offset: 0
The a(1) = 1 through a(7) = 18 compositions:
(1) (2) (3) (4) (5) (6) (7)
(11) (111) (22) (113) (33) (115)
(112) (122) (114) (133)
(211) (221) (222) (223)
(1111) (311) (411) (322)
(1112) (1113) (331)
(2111) (3111) (511)
(11111) (11112) (1114)
(21111) (1222)
(111111) (2221)
(4111)
(11113)
(11122)
(22111)
(31111)
(111112)
(211111)
(1111111)
Partitions with distinct run-lengths are
A098859.
Partitions with strictly increasing run-lengths are
A100471.
Partitions with strictly decreasing run-lengths are
A100881.
Partitions with weakly decreasing run-lengths are
A100882.
Partitions with weakly increasing run-lengths are
A100883.
Compositions with equal run-lengths are
A329738.
Compositions whose run-lengths are unimodal are
A332726.
Compositions whose run-lengths are unimodal or co-unimodal are
A332746.
Compositions whose run-lengths are neither incr. nor decr. are
A332833.
Compositions that are neither increasing nor decreasing are
A332834.
Compositions with weakly increasing run-lengths are
A332836.
Compositions that are strictly incr. or strictly decr. are
A333147.
Compositions with strictly increasing run-lengths are
A333192.
-
Table[Length[Select[Join@@Permutations/@IntegerPartitions[n],Or[Less@@Length/@Split[#],Greater@@Length/@Split[#]]&]],{n,0,15}]
A333149
Number of strict compositions of n that are neither increasing nor decreasing.
Original entry on oeis.org
0, 0, 0, 0, 0, 0, 4, 4, 8, 12, 38, 42, 72, 98, 150, 298, 372, 542, 760, 1070, 1428, 2600, 3120, 4550, 6050, 8478, 10976, 15220, 23872, 29950, 41276, 55062, 74096, 97148, 129786, 167256, 256070, 314454, 429338, 556364, 749266, 955746, 1275016, 1618054
Offset: 0
The a(6) = 4 through a(9) = 12 compositions:
(1,3,2) (1,4,2) (1,4,3) (1,5,3)
(2,1,3) (2,1,4) (1,5,2) (1,6,2)
(2,3,1) (2,4,1) (2,1,5) (2,1,6)
(3,1,2) (4,1,2) (2,5,1) (2,4,3)
(3,1,4) (2,6,1)
(3,4,1) (3,1,5)
(4,1,3) (3,2,4)
(5,1,2) (3,4,2)
(3,5,1)
(4,2,3)
(5,1,3)
(6,1,2)
The complement is counted by
A333147.
Non-unimodal strict compositions are
A072707.
Strict partitions with increasing or decreasing run-lengths are
A333190.
Strict compositions with increasing or decreasing run-lengths are
A333191.
Cf.
A059204,
A115981,
A227038,
A329398,
A332745,
A332746,
A332831,
A332833,
A332835,
A332874,
A333150,
A333192.
-
Table[Length[Select[Join@@Permutations/@IntegerPartitions[n],UnsameQ@@#&&!Greater@@#&&!Less@@#&]],{n,0,10}]
A333190
Number of integer partitions of n whose run-lengths are either strictly increasing or strictly decreasing.
Original entry on oeis.org
1, 1, 2, 2, 4, 5, 7, 10, 13, 15, 21, 26, 29, 39, 49, 50, 68, 80, 92, 109, 129, 142, 181, 201, 227, 262, 317, 343, 404, 456, 516, 589, 677, 742, 870, 949, 1077, 1207, 1385, 1510, 1704, 1895, 2123, 2352, 2649, 2877, 3261, 3571, 3966, 4363, 4873, 5300, 5914, 6466
Offset: 0
The a(1) = 1 through a(8) = 13 partitions:
(1) (2) (3) (4) (5) (6) (7) (8)
(11) (111) (22) (221) (33) (322) (44)
(211) (311) (222) (331) (332)
(1111) (2111) (411) (511) (422)
(11111) (3111) (2221) (611)
(21111) (4111) (2222)
(111111) (22111) (5111)
(31111) (22211)
(211111) (41111)
(1111111) (221111)
(311111)
(2111111)
(11111111)
The generalization to compositions is
A333191.
Partitions with distinct run-lengths are
A098859.
Partitions with strictly increasing run-lengths are
A100471.
Partitions with strictly decreasing run-lengths are
A100881.
Partitions with weakly decreasing run-lengths are
A100882.
Partitions with weakly increasing run-lengths are
A100883.
Partitions with unimodal run-lengths are
A332280.
Partitions whose run-lengths are not increasing nor decreasing are
A332641.
Compositions whose run-lengths are unimodal or co-unimodal are
A332746.
Compositions that are neither increasing nor decreasing are
A332834.
Strictly increasing or strictly decreasing compositions are
A333147.
Compositions with strictly increasing run-lengths are
A333192.
Numbers with strictly increasing prime multiplicities are
A334965.
-
Table[Length[Select[IntegerPartitions[n],Or[Less@@Length/@Split[#],Greater@@Length/@Split[#]]&]],{n,0,30}]
A333193
Number of compositions of n whose non-adjacent parts are strictly decreasing.
Original entry on oeis.org
1, 1, 2, 3, 5, 7, 11, 15, 21, 29, 40, 53, 71, 93, 122, 158, 204, 260, 332, 419, 528, 661, 825, 1023, 1267, 1560, 1916, 2344, 2860, 3476, 4217, 5097, 6147, 7393, 8872, 10618, 12685, 15115, 17977, 21336, 25276, 29882, 35271, 41551, 48872, 57385, 67277, 78745, 92040
Offset: 0
The a(1) = 1 through a(7) = 15 compositions:
(1) (2) (3) (4) (5) (6) (7)
(11) (12) (13) (14) (15) (16)
(21) (22) (23) (24) (25)
(31) (32) (33) (34)
(211) (41) (42) (43)
(221) (51) (52)
(311) (231) (61)
(312) (241)
(321) (322)
(411) (331)
(2211) (412)
(421)
(511)
(2311)
(3211)
For example, (2,3,1,2) is not such a composition, because the non-adjacent pairs of parts are (2,1), (2,2), (3,2), not all of which are strictly decreasing, while (2,4,1,1) is such a composition, because the non-adjacent pairs of parts are (2,1), (2,1), (4,1), all of which are strictly decreasing.
A version for ordered set partitions is
A332872.
The case of strict compositions is
A333150.
The case of normal sequences appears to be
A001045.
Partitions with strictly increasing run-lengths are
A100471.
Partitions with strictly decreasing run-lengths are
A100881.
Compositions with weakly decreasing non-adjacent parts are
A333148.
Compositions with strictly increasing run-lengths are
A333192.
-
Table[Length[Select[Join@@Permutations/@IntegerPartitions[n],!MatchQ[#,{_,x_,,y_,_}/;y>=x]&]],{n,0,15}]
-
\\ p is all, q is those ending in an unreversed singleton.
seq(n)={my(q=O(x*x^n), p=1+q); for(k=1, n, [p,q] = [p*(1 + x^k + x^(2*k)) + q*x^k, q + p*x^k] ); Vec(p)} \\ Andrew Howroyd, Apr 17 2021
Showing 1-4 of 4 results.
Comments