A364059 -id:A364059 - cp's OEIS frontend

A363947 Number of integer partitions of n with mean < 3/2.

0, 1, 1, 1, 2, 2, 2, 4, 4, 4, 7, 7, 7, 12, 12, 12, 19, 19, 19, 30, 30, 30, 45, 45, 45, 67, 67, 67, 97, 97, 97, 139, 139, 139, 195, 195, 195, 272, 272, 272, 373, 373, 373, 508, 508, 508, 684, 684, 684, 915, 915, 915, 1212, 1212, 1212, 1597, 1597, 1597, 2087

Offset: 0

Gus Wiseman, Jul 02 2023

nonn

			The partition y = (2,2,1) has mean 5/3, which is not less than 3/2, so y is not counted under 5.
The a(1) = 1 through a(8) = 4 partitions:
  (1)  (11)  (111)  (211)   (2111)   (21111)   (22111)    (221111)
                    (1111)  (11111)  (111111)  (31111)    (311111)
                                               (211111)   (2111111)
                                               (1111111)  (11111111)

The high version is A000012 (all ones).
This is A000070 with each term repeated three times (see A025065 for two).
These partitions have ranks A363948.
The complement is counted by A364059.
A008284 counts partitions by length, A058398 by mean.
A051293 counts subsets with integer mean, median A000975.
A067538 counts partitions with integer mean, strict A102627, ranks A316413.
A327482 counts partitions by integer mean.
A349156 counts partitions with non-integer mean, ranks A348551.
Cf. A000041, A002865, A026905, A027336, A237984, A241131, A327472, A363724, A363745, A363943, A363949.

Table[Length[Select[IntegerPartitions[n],Round[Mean[#]]==1&]],{n,0,15}]

A363489 Rounded mean of the multiset of prime indices of n.

Original entry on oeis.org

0, 1, 2, 1, 3, 2, 4, 1, 2, 2, 5, 1, 6, 2, 2, 1, 7, 2, 8, 2, 3, 3, 9, 1, 3, 4, 2, 2, 10, 2, 11, 1, 4, 4, 4, 2, 12, 4, 4, 2, 13, 2, 14, 2, 2, 5, 15, 1, 4, 2, 4, 3, 16, 2, 4, 2, 5, 6, 17, 2, 18, 6, 3, 1, 4, 3, 19, 3, 6, 3, 20, 1, 21, 6, 3, 3, 4, 3, 22, 1, 2, 7

Offset: 1

Gus Wiseman, Jul 07 2023

nonn

A prime index of n is a number m such that prime(m) divides n. The multiset of prime indices of n is row n of A112798.

We use the "rounding half to even" rule, see link.

			The prime indices of 180 are {1,1,2,2,3}, with mean 9/5, which rounds to 2, so a(180) = 2.

Wikipedia, Rounding.

Positions of first appearances are 1 and A000040.
Before rounding we had A326567/A326568.
For rounded-down: A363943, triangle A363945.
For rounded-up: A363944, triangle A363946.
Positions of 1's are A363948, complement A364059.
The triangle for this statistic (rounded mean) is A364060.
For prime factors instead of indices we have A364061.
A088529/A088530 gives mean of prime signature A124010.
A112798 lists prime indices, length A001222, sum A056239.
A316413 ranks partitions with integer mean, counted by A067538.
Cf. A327473, A327476, A327482, A359889, A360005, A363947, A363949, A363951.

prix[n_]:=If[n==1,{},Flatten[Cases[FactorInteger[n],{p_,k_}:>Table[PrimePi[p],{k}]]]];
Table[If[n==1,0,Round[Mean[prix[n]]]],{n,100}]

cp's OEIS Frontend

A363947 Number of integer partitions of n with mean < 3/2.

Views

Author

Keywords

Examples

Crossrefs

Programs

Mathematica