A337696
Numbers k such that the k-th composition in standard order (A066099) is strict and pairwise non-coprime, meaning the parts are distinct and any two of them have a common divisor > 1.
Original entry on oeis.org
0, 2, 4, 8, 16, 32, 34, 40, 64, 128, 130, 160, 256, 260, 288, 512, 514, 520, 544, 640, 1024, 2048, 2050, 2052, 2056, 2082, 2088, 2176, 2178, 2208, 2304, 2560, 2568, 2592, 4096, 8192, 8194, 8200, 8224, 8226, 8232, 8320, 8704, 8706, 8832, 10240, 10248, 10368
Offset: 1
The sequence together with the corresponding compositions begins:
0: () 512: (10) 2304: (3,9)
2: (2) 514: (8,2) 2560: (2,10)
4: (3) 520: (6,4) 2568: (2,6,4)
8: (4) 544: (4,6) 2592: (2,4,6)
16: (5) 640: (2,8) 4096: (13)
32: (6) 1024: (11) 8192: (14)
34: (4,2) 2048: (12) 8194: (12,2)
40: (2,4) 2050: (10,2) 8200: (10,4)
64: (7) 2052: (9,3) 8224: (8,6)
128: (8) 2056: (8,4) 8226: (8,4,2)
130: (6,2) 2082: (6,4,2) 8232: (8,2,4)
160: (2,6) 2088: (6,2,4) 8320: (6,8)
256: (9) 2176: (4,8) 8704: (4,10)
260: (6,3) 2178: (4,6,2) 8706: (4,8,2)
288: (3,6) 2208: (4,2,6) 8832: (4,2,8)
A318719 gives the Heinz numbers of the unordered version, with non-strict version
A337694.
A337667 counts the non-strict version.
A337462 counts pairwise coprime compositions.
A318749 counts pairwise non-coprime factorizations, with strict case
A319786.
All of the following pertain to compositions in standard order (
A066099):
-
A233564 ranks strict compositions.
-
A272919 ranks constant compositions.
-
A333227 ranks pairwise coprime compositions, or
A335235 if singletons are considered coprime.
-
A333228 ranks compositions whose distinct parts are pairwise coprime.
-
A335236 ranks compositions neither a singleton nor pairwise coprime.
-
A337561 is the pairwise coprime instead of pairwise non-coprime version, or
A337562 if singletons are considered coprime.
-
A337666 ranks the non-strict version.
Cf.
A082024,
A101268,
A302797,
A305713,
A319752,
A327040,
A327516,
A336737,
A337599,
A337604,
A337605.
-
stc[n_]:=Differences[Prepend[Join@@Position[Reverse[IntegerDigits[n,2]],1],0]]//Reverse;
stabQ[u_,Q_]:=And@@Not/@Q@@@Tuples[u,2];
Select[Range[0,1000],UnsameQ@@stc[#]&&stabQ[stc[#],CoprimeQ]&]
A338317
Number of integer partitions of n with no 1's and pairwise coprime distinct parts, where a singleton is always considered coprime.
Original entry on oeis.org
1, 0, 1, 1, 2, 2, 3, 4, 5, 6, 7, 11, 11, 16, 16, 19, 25, 32, 34, 44, 46, 53, 66, 80, 88, 101, 116, 132, 150, 180, 204, 229, 254, 287, 331, 366, 426, 473, 525, 584, 662, 742, 835, 922, 1013, 1128, 1262, 1408, 1555, 1711, 1894, 2080, 2297, 2555, 2806, 3064, 3376
Offset: 0
The a(2) = 1 through a(12) = 11 partitions (A = 10, B = 11, C = 12):
2 3 4 5 6 7 8 9 A B C
22 32 33 43 44 54 55 65 66
222 52 53 72 73 74 75
322 332 333 433 83 444
2222 522 532 92 543
3222 3322 443 552
22222 533 732
722 3333
3332 5322
5222 33222
32222 222222
A200976 (
A338318) gives the pairwise non-coprime instead of coprime version.
A328673 (
A328867) gives partitions with no distinct relatively prime parts.
A337485 (
A337984) gives pairwise coprime integer partitions with no 1's.
A337665 (
A333228) gives compositions with pairwise coprime distinct parts.
-
Table[Length[Select[IntegerPartitions[n],!MemberQ[#,1]&&(SameQ@@#||CoprimeQ@@Union[#])&]],{n,0,15}]
A338318
Composite numbers whose prime indices are pairwise intersecting (non-coprime).
Original entry on oeis.org
9, 21, 25, 27, 39, 49, 57, 63, 65, 81, 87, 91, 111, 115, 117, 121, 125, 129, 133, 147, 159, 169, 171, 183, 185, 189, 203, 213, 235, 237, 243, 247, 259, 261, 267, 273, 289, 299, 301, 303, 305, 319, 321, 325, 333, 339, 343, 351, 361, 365, 371, 377, 387, 393
Offset: 1
The sequence of terms together with their prime indices begins:
9: {2,2} 121: {5,5} 243: {2,2,2,2,2}
21: {2,4} 125: {3,3,3} 247: {6,8}
25: {3,3} 129: {2,14} 259: {4,12}
27: {2,2,2} 133: {4,8} 261: {2,2,10}
39: {2,6} 147: {2,4,4} 267: {2,24}
49: {4,4} 159: {2,16} 273: {2,4,6}
57: {2,8} 169: {6,6} 289: {7,7}
63: {2,2,4} 171: {2,2,8} 299: {6,9}
65: {3,6} 183: {2,18} 301: {4,14}
81: {2,2,2,2} 185: {3,12} 303: {2,26}
87: {2,10} 189: {2,2,2,4} 305: {3,18}
91: {4,6} 203: {4,10} 319: {5,10}
111: {2,12} 213: {2,20} 321: {2,28}
115: {3,9} 235: {3,15} 325: {3,3,6}
117: {2,2,6} 237: {2,22} 333: {2,2,12}
A200976 counts the partitions with these Heinz numbers.
A302696 is the pairwise coprime instead of pairwise non-coprime version.
A318717 counts pairwise intersecting strict partitions.
A328673 counts partitions with pairwise intersecting distinct parts, with Heinz numbers
A328867 and restriction to triples
A337599 (except n = 3).
Cf.
A008578,
A051185,
A056239,
A101268,
A112798,
A284825,
A302569,
A305843,
A319752,
A327516,
A335236,
A337666,
A337667.
-
stabstrQ[u_,Q_]:=And@@Not/@Q@@@Tuples[u,2];
Select[Range[2,100],!PrimeQ[#]&&stabstrQ[PrimePi/@First/@FactorInteger[#],CoprimeQ]&]
Comments