A342339
Heinz numbers of the integer partitions counted by A342337, which have all adjacent parts (x, y) satisfying either x = y or x = 2y.
Original entry on oeis.org
1, 2, 3, 4, 5, 6, 7, 8, 9, 11, 12, 13, 16, 17, 18, 19, 21, 23, 24, 25, 27, 29, 31, 32, 36, 37, 41, 42, 43, 47, 48, 49, 53, 54, 59, 61, 63, 64, 65, 67, 71, 72, 73, 79, 81, 83, 84, 89, 96, 97, 101, 103, 107, 108, 109, 113, 121, 125, 126, 127, 128, 131, 133, 137
Offset: 1
The sequence of terms together with their prime indices begins:
1: {} 19: {8} 48: {1,1,1,1,2}
2: {1} 21: {2,4} 49: {4,4}
3: {2} 23: {9} 53: {16}
4: {1,1} 24: {1,1,1,2} 54: {1,2,2,2}
5: {3} 25: {3,3} 59: {17}
6: {1,2} 27: {2,2,2} 61: {18}
7: {4} 29: {10} 63: {2,2,4}
8: {1,1,1} 31: {11} 64: {1,1,1,1,1,1}
9: {2,2} 32: {1,1,1,1,1} 65: {3,6}
11: {5} 36: {1,1,2,2} 67: {19}
12: {1,1,2} 37: {12} 71: {20}
13: {6} 41: {13} 72: {1,1,1,2,2}
16: {1,1,1,1} 42: {1,2,4} 73: {21}
17: {7} 43: {14} 79: {22}
18: {1,2,2} 47: {15} 81: {2,2,2,2}
The first condition alone gives
A000961 (perfect powers).
The second condition alone is counted by
A154402.
These partitions are counted by
A342337.
A018819 counts partitions into powers of 2.
A000929 counts partitions with adjacent parts x >= 2y.
A002843 counts compositions with adjacent parts x <= 2y.
A045690 counts sets with maximum n in with adjacent elements y < 2x.
A224957 counts compositions with x <= 2y and y <= 2x (strict:
A342342).
A274199 counts compositions with adjacent parts x < 2y.
A342098 counts partitions with adjacent parts x > 2y.
A342331 counts compositions with adjacent parts x = 2y or y = 2x.
A342332 counts compositions with adjacent parts x > 2y or y > 2x.
A342333 counts compositions with adjacent parts x >= 2y or y >= 2x.
A342334 counts compositions with adjacent parts x >= 2y or y > 2x.
A342335 counts compositions with adjacent parts x >= 2y or y = 2x.
A342338 counts compositions with adjacent parts x < 2y and y <= 2x.
A342342 counts strict compositions with adjacent parts x <= 2y and y <= 2x.
Cf.
A003114,
A003242,
A034296,
A040039,
A167606.
A342083,
A342084,
A342087,
A342191,
A342336,
A342339,
A342340.
-
Select[Range[100],With[{y=PrimePi/@First/@FactorInteger[#]},And@@Table[y[[i]]==y[[i-1]]||y[[i]]==2*y[[i-1]],{i,2,Length[y]}]]&]
A342514
Number of integer partitions of n with distinct first quotients.
Original entry on oeis.org
1, 1, 2, 2, 4, 5, 6, 8, 11, 14, 18, 24, 28, 35, 41, 52, 64, 81, 93, 115, 137, 157, 190, 225, 268, 313, 366, 430, 502, 587, 683, 790, 913, 1055, 1217, 1393, 1605, 1830, 2098, 2384, 2722, 3101, 3524, 4005, 4524, 5137, 5812, 6570, 7434, 8360, 9416, 10602, 11881
Offset: 0
The partition (4,3,3,2,1) has first quotients (3/4,1,2/3,1/2) so is counted under a(13), but it has first differences (-1,0,-1,-1) so is not counted under A325325(13).
The a(1) = 1 through a(9) = 14 partitions:
(1) (2) (3) (4) (5) (6) (7) (8) (9)
(11) (21) (22) (32) (33) (43) (44) (54)
(31) (41) (42) (52) (53) (63)
(211) (221) (51) (61) (62) (72)
(311) (321) (322) (71) (81)
(411) (331) (332) (432)
(511) (422) (441)
(3211) (431) (522)
(521) (531)
(611) (621)
(3221) (711)
(3321)
(4311)
(5211)
The version for differences instead of quotients is
A325325.
The Heinz numbers of these partitions are
A342521.
A000005 counts constant partitions.
A167865 counts strict chains of divisors > 1 summing to n.
A342096 counts partitions with all adjacent parts x < 2y (strict:
A342097).
A342098 counts partitions with all adjacent parts x > 2y.
-
Table[Length[Select[IntegerPartitions[n],UnsameQ@@Divide@@@Partition[#,2,1]&]],{n,0,30}]
A342498
Number of integer partitions of n with strictly increasing first quotients.
Original entry on oeis.org
1, 1, 2, 2, 4, 4, 5, 6, 8, 9, 12, 12, 14, 16, 18, 20, 24, 26, 27, 30, 35, 37, 45, 47, 52, 56, 61, 65, 72, 77, 83, 90, 95, 99, 109, 117, 127, 135, 144, 151, 164, 172, 181, 197, 209, 222, 239, 249, 263, 280, 297, 310, 332, 349, 368, 391, 412, 433, 457, 480, 503
Offset: 0
The partition y = (13,7,2,1) has first quotients (7/13,2/7,1/2) so is not counted under a(23). However, the first differences (-6,-5,-1) are strictly increasing, so y is counted under A240027(23).
The a(1) = 1 through a(9) = 9 partitions:
(1) (2) (3) (4) (5) (6) (7) (8) (9)
(11) (21) (22) (32) (33) (43) (44) (54)
(31) (41) (42) (52) (53) (63)
(211) (311) (51) (61) (62) (72)
(411) (322) (71) (81)
(511) (422) (522)
(521) (621)
(611) (711)
(5211)
The version for differences instead of quotients is
A240027.
The weakly increasing version is
A342497.
The strictly decreasing version is
A342499.
The Heinz numbers of these partitions are
A342524.
A000005 counts constant partitions.
A074206 counts ordered factorizations.
A167865 counts strict chains of divisors > 1 summing to n.
A342098 counts partitions with adjacent parts x > 2y.
-
Table[Length[Select[IntegerPartitions[n],Less@@Divide@@@Reverse/@Partition[#,2,1]&]],{n,0,30}]
A342499
Number of integer partitions of n with strictly decreasing first quotients.
Original entry on oeis.org
1, 1, 2, 2, 3, 4, 5, 5, 7, 9, 10, 11, 14, 15, 18, 20, 23, 26, 31, 34, 39, 42, 45, 51, 58, 65, 70, 78, 83, 91, 102, 111, 122, 133, 145, 158, 170, 182, 202, 217, 231, 248, 268, 285, 307, 332, 354, 374, 404, 436, 468, 502, 537, 576, 618, 654, 694, 737, 782, 830
Offset: 0
The partition (6,6,3,1) has first quotients (1,1/2,1/3) so is counted under a(16).
The a(1) = 1 through a(9) = 9 partitions:
(1) (2) (3) (4) (5) (6) (7) (8) (9)
(11) (21) (22) (32) (33) (43) (44) (54)
(31) (41) (42) (52) (53) (63)
(221) (51) (61) (62) (72)
(321) (331) (71) (81)
(332) (432)
(431) (441)
(531)
(3321)
The version for differences instead of quotients is
A320470.
The strictly increasing version is
A342498.
The weakly decreasing version is
A342513.
The Heinz numbers of these partitions are listed by
A342525.
A000005 counts constant partitions.
A074206 counts ordered factorizations.
A167865 counts strict chains of divisors > 1 summing to n.
A342098 counts partitions with adjacent parts x > 2y.
-
Table[Length[Select[IntegerPartitions[n],Greater@@Divide@@@Reverse/@Partition[#,2,1]&]],{n,0,30}]
A342517
Number of strict integer partitions of n with strictly increasing first quotients.
Original entry on oeis.org
1, 1, 1, 2, 2, 3, 3, 4, 5, 6, 7, 8, 8, 10, 11, 13, 14, 16, 16, 19, 21, 23, 27, 29, 31, 34, 36, 40, 43, 47, 49, 53, 56, 59, 66, 71, 75, 81, 86, 89, 97, 104, 110, 119, 123, 132, 143, 148, 156, 168, 177, 184, 198, 209, 218, 232, 246, 257, 269, 282, 294
Offset: 0
The partition (14,8,5,3,2) has first quotients (4/7,5/8,3/5,2/3) so is not counted under a(32), even though the differences (-6,-3,-2,-1) are strictly increasing.
The a(1) = 1 through a(13) = 10 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
61 71 72 82 83 93 94
521 81 91 92 A2 A3
621 532 A1 B1 B2
721 632 732 C1
821 921 643
832
A21
The version for differences instead of quotients is
A179254.
The non-strict ordered version is
A342493.
The weakly increasing version is
A342516.
The strictly decreasing version is
A342518.
A045690 counts sets with maximum n with all adjacent elements y < 2x.
A167865 counts strict chains of divisors > 1 summing to n.
A342096 counts partitions with all adjacent parts x < 2y (strict:
A342097).
A342098 counts (strict) partitions with all adjacent parts x > 2y.
-
Table[Length[Select[IntegerPartitions[n],UnsameQ@@#&&Less@@Divide@@@Reverse/@Partition[#,2,1]&]],{n,0,30}]
A342518
Number of strict integer partitions of n with strictly decreasing first quotients.
Original entry on oeis.org
1, 1, 1, 2, 2, 3, 4, 4, 5, 7, 8, 9, 11, 12, 13, 17, 18, 21, 24, 28, 30, 34, 37, 41, 47, 52, 56, 63, 68, 72, 83, 89, 99, 108, 117, 128, 139, 149, 163, 179, 189, 203, 217, 233, 250, 272, 289, 305, 329, 355, 381, 410, 438, 471, 505, 540, 571, 607, 645, 683, 726
Offset: 0
The strict partition (12,10,6,3,1) has first quotients (5/6,3/5,1/2,1/3) so is counted under a(32), even though the differences (-2,-4,-3,-2) are not strictly decreasing.
The a(1) = 1 through a(13) = 12 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
432 541 A1 B1 B2
531 631 542 543 C1
4321 641 642 652
731 651 742
741 751
831 841
5431
The version for differences instead of quotients is
A320388.
The non-strict ordered version is
A342494.
The strictly increasing version is
A342517.
The weakly decreasing version is
A342519.
A045690 counts sets with maximum n with all adjacent elements y < 2x.
A167865 counts strict chains of divisors > 1 summing to n.
A342096 counts partitions with all adjacent parts x < 2y (strict:
A342097).
A342098 counts (strict) partitions with all adjacent parts x > 2y.
-
Table[Length[Select[IntegerPartitions[n],UnsameQ@@#&&Greater@@Divide@@@Reverse/@Partition[#,2,1]&]],{n,0,30}]
Comments