A357875
Numbers whose run-sums of prime indices are weakly increasing.
Original entry on oeis.org
1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15, 16, 17, 18, 19, 20, 21, 22, 23, 25, 26, 27, 28, 29, 30, 31, 32, 33, 34, 35, 36, 37, 38, 39, 40, 41, 42, 43, 44, 46, 47, 49, 50, 51, 52, 53, 54, 55, 56, 57, 58, 59, 60, 61, 62, 63, 64, 65, 66, 67, 68, 69, 70
Offset: 1
The prime indices of 24 are (1,1,1,2), with run-sums (3,2), which are not weakly increasing, so 24 is not in the sequence.
These partitions are counted by
A304405.
These are the indices of rows in
A354584 that are weakly increasing.
-
primeMS[n_]:=If[n==1,{},Flatten[Cases[FactorInteger[n],{p_,k_}:>Table[PrimePi[p],{k}]]]];
Select[Range[100],LessEqual@@Total/@Split[primeMS[#]]&]
A357861
Numbers whose prime indices have weakly decreasing run-sums. Heinz numbers of the partitions counted by A304406.
Original entry on oeis.org
1, 2, 3, 4, 5, 7, 8, 9, 11, 12, 13, 16, 17, 19, 23, 24, 25, 27, 29, 31, 32, 37, 40, 41, 43, 45, 47, 48, 49, 53, 59, 61, 63, 64, 67, 71, 73, 79, 80, 81, 83, 89, 96, 97, 101, 103, 107, 109, 112, 113, 121, 125, 127, 128, 131, 135, 137, 139, 144, 149, 151, 157
Offset: 1
The terms together with their prime indices begin:
1: {}
2: {1}
3: {2}
4: {1,1}
5: {3}
7: {4}
8: {1,1,1}
9: {2,2}
11: {5}
12: {1,1,2}
13: {6}
16: {1,1,1,1}
17: {7}
19: {8}
23: {9}
24: {1,1,1,2}
25: {3,3}
27: {2,2,2}
For example, the prime indices of 24 are {1,1,1,2}, with run-sums (3,2), which are weakly decreasing, so 24 is in the sequence.
These partitions are counted by
A304406.
These are the indices of rows in
A354584 that are weakly decreasing.
The opposite (weakly increasing) version is
A357875, counted by
A304405.
-
primeMS[n_]:=If[n==1,{},Flatten[Cases[FactorInteger[n],{p_,k_}:>Table[PrimePi[p],{k}]]]];
Select[Range[100],GreaterEqual@@Total/@Split[primeMS[#]]&]
A357878
Number of integer partitions of n whose run-sums are not weakly decreasing.
Original entry on oeis.org
0, 0, 0, 0, 0, 1, 1, 3, 4, 8, 11, 19, 25, 40, 55, 79, 104, 150, 196, 270, 350, 467, 600, 786, 997, 1293, 1632, 2077, 2597, 3283, 4067, 5088, 6268, 7769, 9517, 11704, 14238, 17405, 21092, 25598, 30861, 37278, 44729, 53742, 64226, 76811, 91448, 108929, 129174
Offset: 0
The a(0) = 0 through a(9) = 8 partitions:
. . . . . (2111) (21111) (322) (3221) (3222)
(31111) (32111) (32211)
(211111) (311111) (42111)
(2111111) (321111)
(411111)
(2211111)
(3111111)
(21111111)
Number of rows in
A354584 summing to n that are weakly increasing.
The opposite (not weakly increasing) version is
A357865, ranked by
A357850.
These partitions are ranked by
A357876.
-
Table[Length[Select[IntegerPartitions[n],!LessEqual@@Total/@Split[Reverse[#]]&]],{n,0,30}]
A357850
Numbers whose prime indices do not have weakly decreasing run-sums. Heinz numbers of the partitions counted by A357865.
Original entry on oeis.org
6, 10, 14, 15, 18, 20, 21, 22, 26, 28, 30, 33, 34, 35, 36, 38, 39, 42, 44, 46, 50, 51, 52, 54, 55, 56, 57, 58, 60, 62, 65, 66, 68, 69, 70, 72, 74, 75, 76, 77, 78, 82, 84, 85, 86, 87, 88, 90, 91, 92, 93, 94, 95, 98, 99, 100, 102, 104, 105, 106, 108, 110, 111
Offset: 1
The terms together with their prime indices begin:
6: {1,2}
10: {1,3}
14: {1,4}
15: {2,3}
18: {1,2,2}
20: {1,1,3}
21: {2,4}
22: {1,5}
26: {1,6}
28: {1,1,4}
30: {1,2,3}
33: {2,5}
34: {1,7}
35: {3,4}
36: {1,1,2,2}
38: {1,8}
39: {2,6}
42: {1,2,4}
These are the indices of rows in
A354584 that are not weakly decreasing.
These partitions are counted by
A357865.
The opposite (not weakly increasing) version is
A357876, counted by
A357878.
Cf.
A118914,
A181819,
A300273,
A304405,
A304428,
A304430,
A304442,
A353832,
A353864,
A353932,
A357864,
A357875.
-
primeMS[n_]:=If[n==1,{},Flatten[Cases[FactorInteger[n],{p_,k_}:>Table[PrimePi[p],{k}]]]];
Select[Range[100],!GreaterEqual@@Total/@Split[primeMS[#]]&]
A357865
Number of integer partitions of n whose run-sums are not weakly increasing.
Original entry on oeis.org
0, 0, 0, 1, 1, 4, 5, 10, 13, 22, 31, 45, 57, 85, 115, 155, 199, 267, 344, 452, 577, 744, 940, 1191, 1486, 1877, 2339, 2910, 3595, 4442, 5453, 6688, 8162, 9960, 12089, 14662, 17698, 21365, 25703, 30869, 36961, 44207, 52728, 62801, 74644, 88587, 104930, 124113
Offset: 0
The a(0) = 0 through a(8) = 13 partitions:
. . . (21) (31) (32) (42) (43) (53)
(41) (51) (52) (62)
(221) (321) (61) (71)
(311) (411) (331) (332)
(2211) (421) (431)
(511) (521)
(2221) (611)
(3211) (3221)
(4111) (3311)
(22111) (4211)
(5111)
(22211)
(32111)
Number of rows in
A354584 summing to n that are not weakly decreasing.
These partitions are ranked by
A357850.
The opposite (not weakly decreasing) version is
A357878, ranked by
A357876.
-
Table[Length[Select[IntegerPartitions[n],!LessEqual@@Total/@Split[#]&]],{n,0,30}]
A357863
Numbers whose prime indices do not have strictly increasing run-sums. Heinz numbers of the partitions not counted by A304428.
Original entry on oeis.org
12, 24, 40, 45, 48, 60, 63, 80, 84, 90, 96, 112, 120, 126, 132, 135, 144, 156, 160, 168, 175, 180, 189, 192, 204, 224, 228, 240, 252, 264, 270, 275, 276, 280, 288, 297, 300, 312, 315, 320, 325, 336, 348, 350, 351, 352, 360, 372, 378, 384, 405, 408, 420, 440
Offset: 1
The terms together with their prime indices begin:
12: {1,1,2}
24: {1,1,1,2}
40: {1,1,1,3}
45: {2,2,3}
48: {1,1,1,1,2}
60: {1,1,2,3}
63: {2,2,4}
80: {1,1,1,1,3}
84: {1,1,2,4}
90: {1,2,2,3}
96: {1,1,1,1,1,2}
112: {1,1,1,1,4}
120: {1,1,1,2,3}
126: {1,2,2,4}
132: {1,1,2,5}
135: {2,2,2,3}
144: {1,1,1,1,2,2}
156: {1,1,2,6}
These are the indices of rows in
A354584 that are not strictly increasing.
The weak (not weakly increasing) version is
A357876, counted by
A357878.
-
primeMS[n_]:=If[n==1,{},Flatten[Cases[FactorInteger[n],{p_,k_}:>Table[PrimePi[p],{k}]]]];
Select[Range[100],!Less@@Total/@Split[primeMS[#]]&]
Showing 1-6 of 6 results.
Comments