A383709 Number of integer partitions of n with distinct multiplicities (Wilf) and distinct 0-appended differences.
1, 1, 2, 1, 2, 2, 3, 4, 4, 4, 5, 6, 5, 7, 8, 6, 8, 9, 9, 10, 9, 10, 12, 12, 11, 12, 14, 13, 14, 15, 14, 16, 16, 16, 18, 17, 17, 19, 20, 19, 19, 21, 21, 22, 22, 21, 24, 24, 23, 25, 25, 25, 26, 27, 27, 27, 28, 28, 30, 30, 28, 31, 32, 31, 32, 32, 33, 34, 34, 34
Offset: 0
Keywords
Examples
The a(1) = 1 through a(8) = 4 partitions: (1) (2) (3) (4) (5) (6) (7) (8) (1,1) (2,2) (3,1,1) (3,3) (3,2,2) (4,4) (4,1,1) (3,3,1) (3,3,2) (5,1,1) (6,1,1)
Crossrefs
These partitions are ranked by A383712.
Programs
-
Mathematica
Table[Length[Select[IntegerPartitions[n],UnsameQ@@Length/@Split[#]&&UnsameQ@@Differences[Append[#,0]]&]],{n,0,30}]
Comments