A360456
Number of integer partitions of n for which the parts have the same median as the multiplicities.
Original entry on oeis.org
1, 1, 0, 0, 1, 0, 0, 1, 2, 5, 7, 10, 14, 21, 28, 36, 51, 64, 84, 106, 132, 165, 202, 252, 311, 391, 473, 579, 713, 868, 1069, 1303, 1617, 1954, 2404, 2908, 3556, 4282, 5200, 6207, 7505, 8934, 10700, 12717, 15165, 17863, 21222, 24976, 29443, 34523, 40582, 47415
Offset: 0
The a(1) = 1 through a(11) = 10 partitions:
1 . . 22 . . 2221 3311 333 4222 5222
32111 3222 33211 33221
32211 42211 52211
42111 43111 53111
321111 52111 62111
421111 322211
3211111 431111
521111
4211111
32111111
These partitions have ranks
A360454.
A008284 counts partitions by number of parts.
-
Table[Length[Select[IntegerPartitions[n], Median[Length/@Split[#]]==Median[#]&]],{n,0,30}]
A360681
Numbers for which the prime signature has the same median as the first differences of 0-prepended prime indices.
Original entry on oeis.org
1, 2, 6, 30, 42, 49, 60, 66, 70, 78, 84, 90, 102, 105, 114, 120, 126, 132, 138, 140, 150, 154, 156, 168, 174, 186, 198, 204, 210, 222, 228, 234, 246, 258, 264, 270, 276, 280, 282, 286, 294, 306, 308, 312, 315, 318, 330, 342, 348, 350, 354, 366, 372, 378, 385
Offset: 1
The terms together with their prime indices begin:
1: {}
2: {1}
6: {1,2}
30: {1,2,3}
42: {1,2,4}
49: {4,4}
60: {1,1,2,3}
66: {1,2,5}
70: {1,3,4}
78: {1,2,6}
84: {1,1,2,4}
90: {1,2,2,3}
For example, the prime indices of 2760 are {1,1,1,2,3,9}. The signature is (3,1,1,1), with median 1. The first differences of 0-prepended prime indices are (1,0,0,1,1,6), with median 1/2. So 2760 is not in the sequence.
For distinct prime indices instead of 0-prepended differences:
A360453.
For mean instead of median we have
A360680.
Multisets with integer median:
-
prix[n_]:=If[n==1,{},Flatten[Cases[FactorInteger[n],{p_,k_}:>Table[PrimePi[p],{k}]]]];
Select[Range[100],Median[Length/@Split[prix[#]]] == Median[Differences[Prepend[prix[#],0]]]&]
Comments