A342520 Number of strict integer partitions of n with distinct first quotients.
1, 1, 1, 2, 2, 3, 4, 4, 6, 8, 10, 12, 13, 16, 20, 25, 30, 37, 42, 50, 57, 65, 80, 93, 108, 127, 147, 170, 198, 225, 258, 297, 340, 385, 448, 499, 566, 647, 737, 832, 937, 1064, 1186, 1348, 1522, 1701, 1916, 2157, 2402, 2697, 3013, 3355, 3742, 4190, 4656, 5191
Offset: 0
Keywords
Examples
The strict partition (12,10,5,2,1) has first quotients (5/6,1/2,2/5,1/2) so is not counted under a(30), even though the first differences (-2,-5,-3,-1) are distinct. The a(1) = 1 through a(13) = 16 partitions (A..D = 10..13): 1 2 3 4 5 6 7 8 9 A B C D 21 31 32 42 43 53 54 64 65 75 76 41 51 52 62 63 73 74 84 85 321 61 71 72 82 83 93 94 431 81 91 92 A2 A3 521 432 532 A1 B1 B2 531 541 542 543 C1 621 631 632 642 643 721 641 651 652 4321 731 732 742 821 741 751 5321 831 832 921 841 A21 5431 7321
Links
- Eric Weisstein's World of Mathematics, Logarithmically Concave Sequence.
- Gus Wiseman, Sequences counting and ranking integer partitions by the differences of their successive parts.
- Gus Wiseman, Sequences counting and ranking partitions and compositions by their differences and quotients.
Crossrefs
The version for differences instead of quotients is A320347.
The equal instead of distinct version is A342515.
The non-strict ordered version is A342529.
The version for strict divisor chains is A342530.
A167865 counts strict chains of divisors > 1 summing to n.
A342086 counts strict chains of divisors with strictly increasing quotients.
A342098 counts (strict) partitions with all adjacent parts x > 2y.
Programs
-
Mathematica
Table[Length[Select[IntegerPartitions[n],UnsameQ@@#&&UnsameQ@@Divide@@@Partition[#,2,1]&]],{n,0,30}]
Comments