|
|
A360242
|
|
Number of integer partitions of n where the parts do not have the same mean as the distinct parts.
|
|
14
|
|
|
0, 0, 0, 0, 1, 3, 3, 9, 11, 19, 25, 43, 49, 82, 103, 136, 183, 258, 314, 435, 524, 687, 892, 1150, 1378, 1788, 2241, 2773, 3399, 4308, 5142, 6501, 7834, 9600, 11726, 14099, 16949, 20876, 25042, 30032, 35732, 43322, 51037, 61650, 72807, 86319, 102983, 122163
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
0,6
|
|
LINKS
|
|
|
EXAMPLE
|
The a(1) = 0 through a(9) = 19 partitions:
. . . (211) (221) (411) (322) (332) (441)
(311) (3111) (331) (422) (522)
(2111) (21111) (511) (611) (711)
(2221) (4211) (3222)
(3211) (5111) (3321)
(4111) (22211) (4221)
(22111) (32111) (4311)
(31111) (41111) (5211)
(211111) (221111) (6111)
(311111) (22221)
(2111111) (32211)
(33111)
(42111)
(51111)
(321111)
(411111)
(2211111)
(3111111)
(21111111)
For example, the partition y = (32211) has mean 9/5 and distinct parts {1,2,3} with mean 2, so y is counted under a(9).
|
|
MATHEMATICA
|
Table[Length[Select[IntegerPartitions[n], Mean[#]!=Mean[Union[#]]&]], {n, 0, 30}]
|
|
CROSSREFS
|
The complement for multiplicities instead of distinct parts is A360068.
These partitions have ranks A360246.
A008284 counts partitions by number of parts.
A116608 counts partitions by number of distinct parts.
A360071 counts partitions by number of parts and number of distinct parts.
A360241 counts partitions whose distinct parts have integer mean.
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|