A373241 T(n,k) is the difference between the number of different parts and the number of different multiplicities in the k-th partition of n in graded reverse lexicographic ordering (A080577).
0, 0, 0, 0, 1, 0, 0, 1, 0, 0, 0, 0, 1, 1, 0, 0, 0, 0, 0, 1, 1, 0, 0, 2, 0, 0, 1, 0, 0, 0, 1, 1, 0, 1, 2, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 1, 1, 0, 1, 2, 0, 0, 2, 0, 1, 0, 0, 1, 1, 1, 0, 0, 0, 0, 0, 0, 0, 1, 1, 0, 1, 2, 0, 1, 2, 0, 1, 0, 0, 2, 1, 1, 1, 0, 0, 1, 0, 0, 1, 1, 0, 0, 1, 0, 0, 0, 0, 1, 1, 0, 1, 2, 0, 1, 2, 0, 1, 0, 0, 2, 2, 1, 1, 1, 0, 0, 1, 0, 3, 1, 0, 1, 1, 0, 0, 1, 1, 0, 1, 0, 1, 0, 0, 0, 0, 0, 0, 0
Offset: 1
Examples
The array begins 0 0,0 0,1,0 0,1,0,0,0 0,1,1,0,0,0,0 0,1,1,0,0,2,0,0,1,0,0 0,1,1,0,1,2,0,0,0,1,0,0,0,0,0 0,1,1,0,1,2,0,0,2,0,1,0,0,1,1,1,0,0,0,0,0,0 0,1,1,0,1,2,0,1,2,0,1,0,0,2,1,1,1,0,0,1,0,0,1,1,0,0,1,0,0,0 ...
Links
- Olivier Gérard, Table of n, a(n) for n = 1..215307
Crossrefs
Programs
-
Mathematica
Flatten @ Table[ Map[Length[Union[#]] - Length[Union[Length /@ Split[#]]] &, IntegerPartitions[n]], {n, 1, 20}]
Comments