A373273 a(n) = sum of all distinct multiplicities in every integer partition of n.
1, 3, 5, 11, 18, 29, 48, 74, 107, 161, 237, 324, 471, 648, 876, 1199, 1632, 2141, 2881, 3754, 4910, 6389, 8301, 10570, 13603, 17280, 21915, 27614, 34842, 43416, 54415, 67509, 83782, 103459, 127685, 156457, 192155, 234540, 286112, 347571, 422245, 510311, 617216
Offset: 1
Keywords
Programs
-
Mathematica
Table[Plus @@ Map[Plus @@ Union[Length /@ Split[#]] &, IntegerPartitions[n]], {n, 1, 40}]
Comments