A370584 -id:A370584 - cp's OEIS frontend

A239312 Number of condensed integer partitions of n.

1, 1, 1, 2, 3, 3, 5, 6, 9, 10, 14, 16, 23, 27, 33, 41, 51, 62, 75, 93, 111, 134, 159, 189, 226, 271, 317, 376, 445, 520, 609, 714, 832, 972, 1129, 1304, 1520, 1753, 2023, 2326, 2692, 3077, 3540, 4050, 4642, 5298, 6054, 6887, 7854, 8926, 10133, 11501, 13044

Offset: 0

Clark Kimberling, Mar 15 2014

nonn

Suppose that p is a partition of n. Let x(1), x(2), ..., x(k) be the distinct parts of p, and let m(i) be the multiplicity of x(i) in p. Let c(p) be the partition {m(1)*x(1), m(2)*x(2), ..., x(k)*m(k)} of n. Call a partition q of n a condensed partition of n if q = c(p) for some partition p of n. Then a(n) is the number of distinct condensed partitions of n. Note that c(p) = p if and only if p has distinct parts and that condensed partitions can have repeated parts.

Also the number of integer partitions of n such that it is possible to choose a different divisor of each part. For example, the partition (6,4,4,1) has choices (3,2,4,1), (3,4,2,1), (6,2,4,1), (6,4,2,1) so is counted under a(15). - Gus Wiseman, Mar 12 2024

			a(5) = 3 gives the number of partitions of 5 that result from condensations as shown here: 5 -> 5, 41 -> 41, 32 -> 32, 311 -> 32, 221 -> 41, 2111 -> 32, 11111 -> 5.
From _Gus Wiseman_, Mar 12 2024: (Start)
The a(1) = 1 through a(9) = 10 condensed partitions:
  (1)  (2)  (3)    (4)    (5)    (6)      (7)      (8)      (9)
            (2,1)  (2,2)  (3,2)  (3,3)    (4,3)    (4,4)    (5,4)
                   (3,1)  (4,1)  (4,2)    (5,2)    (5,3)    (6,3)
                                 (5,1)    (6,1)    (6,2)    (7,2)
                                 (3,2,1)  (3,2,2)  (7,1)    (8,1)
                                          (4,2,1)  (3,3,2)  (4,3,2)
                                                   (4,2,2)  (4,4,1)
                                                   (4,3,1)  (5,2,2)
                                                   (5,2,1)  (5,3,1)
                                                            (6,2,1)
(End)

Alois P. Heinz, Table of n, a(n) for n = 0..100 (first 84 terms from Manfred Scheucher)
Manfred Scheucher, Python Script

The strict case is A000009.
These partitions have ranks A368110, complement A355740.
The complement is counted by A370320.
The version for prime factors (not all divisors) is A370592, ranks A368100.
The complement for prime factors is A370593, ranks A355529.
For a unique choice we have A370595, ranks A370810.
For multiple choices we have A370803, ranks A370811.
The case without ones is A370805, complement A370804.
The version for factorizations is A370814, complement A370813.
A000005 counts divisors.
A000041 counts integer partitions.
A237685 counts partitions of depth 1, or A353837 if we include depth 0.
A355731 counts choices of a divisor of each prime index, firsts A355732.
Cf. A355535, A355733, A355739, A367867, A368097, A368414, A370583, A370584, A370594, A370806, A370808.

b:= proc(n,i) option remember; `if`(n=0, {[]},
      `if`(i=1, {[n]}, {seq(map(x-> `if`(j=0, x,
       sort([x[], i*j])), b(n-i*j, i-1))[], j=0..n/i)}))
    end:
a:= n-> nops(b(n$2)):
seq(a(n), n=0..50);  # Alois P. Heinz, Jul 01 2019

u[n_, k_] := u[n, k] = Map[Total, Split[IntegerPartitions[n][[k]]]]; t[n_] := t[n] = DeleteDuplicates[Table[Sort[u[n, k]], {k, 1, PartitionsP[n]}]]; Table[Length[t[n]], {n, 0,   30}]
Table[Length[Select[IntegerPartitions[n], Length[Select[Tuples[Divisors/@#],UnsameQ@@#&]]>0&]], {n,0,30}] (* Gus Wiseman, Mar 12 2024 *)

Typo in definition corrected by Manfred Scheucher, May 29 2015

Name edited by Gus Wiseman, Mar 13 2024

A370320 Number of non-condensed integer partitions of n, or partitions where it is not possible to choose a different divisor of each part.

Original entry on oeis.org

0, 0, 1, 1, 2, 4, 6, 9, 13, 20, 28, 40, 54, 74, 102, 135, 180, 235, 310, 397, 516, 658, 843, 1066, 1349, 1687, 2119, 2634, 3273, 4045, 4995, 6128, 7517, 9171, 11181, 13579, 16457, 19884, 23992, 28859, 34646, 41506, 49634, 59211, 70533, 83836, 99504, 117867

Offset: 0

Gus Wiseman, Mar 02 2024

nonn

Includes all partitions containing 1.

			The a(0) = 0 through a(8) = 13 partitions:
  .  .  (11)  (111)  (211)   (221)    (222)     (331)      (611)
                     (1111)  (311)    (411)     (511)      (2222)
                             (2111)   (2211)    (2221)     (3221)
                             (11111)  (3111)    (3211)     (3311)
                                      (21111)   (4111)     (4211)
                                      (111111)  (22111)    (5111)
                                                (31111)    (22211)
                                                (211111)   (32111)
                                                (1111111)  (41111)
                                                           (221111)
                                                           (311111)
                                                           (2111111)
                                                           (11111111)

The complement is counted by A239312 (condensed partitions).
These partitions have ranks A355740.
Factorizations in the case of prime factors are A368413, complement A368414.
The complement for prime factors is A370592, ranks A368100.
The version for prime factors (not all divisors) is A370593, ranks A355529.
For a unique choice we have A370595, ranks A370810.
For multiple choices we have A370803, ranks A370811.
The case without ones is A370804, complement A370805.
The version for factorizations is A370813, complement A370814.
A000005 counts divisors.
A000041 counts integer partitions.
A027746 lists prime factors, A112798 indices, length A001222.
A355731 counts choices of a divisor of each prime index, firsts A355732.
A355741 chooses prime factors of prime indices, variations A355744, A355745.
Cf. A355535, A355739, A367867, A368097, A368110, A370583, A370584, A370594, A370806, A370807, A370808.

Table[Length[Select[IntegerPartitions[n], Length[Select[Tuples[Divisors/@#], UnsameQ@@#&]]==0&]],{n,0,30}]

a(31)-a(47) from Alois P. Heinz, Mar 03 2024

A370583 Number of subsets of {1..n} such that it is not possible to choose a different prime factor of each element.

Original entry on oeis.org

0, 1, 2, 4, 10, 20, 44, 88, 204, 440, 908, 1816, 3776, 7552, 15364, 31240, 63744, 127488, 257592, 515184, 1036336, 2079312, 4166408, 8332816, 16709632, 33470464, 66978208, 134067488, 268236928, 536473856, 1073233840, 2146467680, 4293851680, 8588355424, 17177430640

Offset: 0

Gus Wiseman, Feb 26 2024

nonn

			The a(0) = 0 through a(5) = 20 subsets:
  .  {1}  {1}    {1}      {1}        {1}
          {1,2}  {1,2}    {1,2}      {1,2}
                 {1,3}    {1,3}      {1,3}
                 {1,2,3}  {1,4}      {1,4}
                          {2,4}      {1,5}
                          {1,2,3}    {2,4}
                          {1,2,4}    {1,2,3}
                          {1,3,4}    {1,2,4}
                          {2,3,4}    {1,2,5}
                          {1,2,3,4}  {1,3,4}
                                     {1,3,5}
                                     {1,4,5}
                                     {2,3,4}
                                     {2,4,5}
                                     {1,2,3,4}
                                     {1,2,3,5}
                                     {1,2,4,5}
                                     {1,3,4,5}
                                     {2,3,4,5}
                                     {1,2,3,4,5}

Multisets of this type are ranked by A355529, complement A368100.
For divisors instead of factors we have A355740, complement A368110.
The complement for set-systems is A367902, ranks A367906, unlabeled A368095.
The version for set-systems is A367903, ranks A367907, unlabeled A368094.
For non-isomorphic multiset partitions we have A368097, complement A368098.
The version for factorizations is A368413, complement A368414.
The complement is counted by A370582.
For a unique choice we have A370584.
Partial sums of A370587, complement A370586.
The minimal case is A370591.
The version for partitions is A370593, complement A370592.
For binary indices instead of factors we have A370637, complement A370636.
A006530 gives greatest prime factor, least A020639.
A027746 lists prime factors, A112798 indices, length A001222.
A355741 counts choices of a prime factor of each prime index.
Cf. A000040, A000720, A001055, A001414, A003963, A005117, A045778, A355739, A355745, A367867, A367905, A368187.

Table[Length[Select[Subsets[Range[n]], Length[Select[Tuples[If[#==1,{},First/@FactorInteger[#]]&/@#], UnsameQ@@#&]]==0&]],{n,0,10}]

a(n) = 2^n - A370582(n).

a(19)-a(34) from Alois P. Heinz, Feb 27 2024

A370585 Number of maximal subsets of {1..n} such that it is possible to choose a different prime factor of each element.

Original entry on oeis.org

1, 1, 1, 1, 2, 2, 5, 5, 7, 11, 25, 25, 38, 38, 84, 150, 178, 178, 235, 235, 341, 579, 1235, 1235, 1523, 1968, 4160, 4824, 6840, 6840, 9140, 9140, 10028, 16264, 33956, 48680, 56000, 56000, 116472, 186724, 223884, 223884, 290312, 290312, 403484, 484028, 1001420

Offset: 0

Gus Wiseman, Feb 26 2024

nonn

First differs from A307984 at a(21) = 579, A307984(21) = 578. The difference is due to the set {10,11,13,14,15,17,19,21}, which is not a basis because log(10) + log(21) = log(14) + log(15).

Also length-pi(n) subsets of {1..n} such that it is possible to choose a different prime factor of each element.

			The a(0) = 1 through a(8) = 7 subsets:
  {}  {}  {2}  {2,3}  {2,3}  {2,3,5}  {2,3,5}  {2,3,5,7}  {2,3,5,7}
                      {3,4}  {3,4,5}  {2,5,6}  {2,5,6,7}  {2,5,6,7}
                                      {3,4,5}  {3,4,5,7}  {3,4,5,7}
                                      {3,5,6}  {3,5,6,7}  {3,5,6,7}
                                      {4,5,6}  {4,5,6,7}  {3,5,7,8}
                                                          {4,5,6,7}
                                                          {5,6,7,8}

Multisets of this type are ranked by A368100, complement A355529.
Factorizations of this type are counted by A368414, complement A368413.
The version for set-systems is A368601, max of A367902 (complement A367903).
This is the maximal case of A370582, complement A370583, cf. A370584.
A different kind of maximality is A370586, complement A370587.
The case containing n is A370590, complement A370591.
Partitions of this type (choosable) are A370592, complement A370593.
For binary indices instead of factors we have A370640, cf. A370636, A370637.
A006530 gives greatest prime factor, least A020639.
A027746 lists prime factors, A112798 indices, length A001222.
A307984 counts Q-bases of logarithms of positive integers.
A355741 counts choices of a prime factor of each prime index.
Cf. A000040, A000720, A005117, A045778, A133686, A333331, A355739, A355740, A355744, A355745, A367905, A368110.

Table[Length[Select[Subsets[Range[n], {PrimePi[n]}],Length[Select[Tuples[If[#==1, {},First/@FactorInteger[#]]&/@#], UnsameQ@@#&]]>0&]],{n,0,10}]

More terms from Jinyuan Wang, Feb 14 2025

A370582 Number of subsets of {1..n} such that it is possible to choose a different prime factor of each element.

Original entry on oeis.org

1, 1, 2, 4, 6, 12, 20, 40, 52, 72, 116, 232, 320, 640, 1020, 1528, 1792, 3584, 4552, 9104, 12240, 17840, 27896, 55792, 67584, 83968, 130656, 150240, 198528, 397056, 507984, 1015968, 1115616, 1579168, 2438544, 3259680, 3730368, 7460736, 11494656, 16145952, 19078464, 38156928

Offset: 0

Gus Wiseman, Feb 25 2024

nonn

			The a(0) = 1 through a(6) = 20 subsets:
  {}  {}  {}   {}     {}     {}       {}
          {2}  {2}    {2}    {2}      {2}
               {3}    {3}    {3}      {3}
               {2,3}  {4}    {4}      {4}
                      {2,3}  {5}      {5}
                      {3,4}  {2,3}    {6}
                             {2,5}    {2,3}
                             {3,4}    {2,5}
                             {3,5}    {2,6}
                             {4,5}    {3,4}
                             {2,3,5}  {3,5}
                             {3,4,5}  {3,6}
                                      {4,5}
                                      {4,6}
                                      {5,6}
                                      {2,3,5}
                                      {2,5,6}
                                      {3,4,5}
                                      {3,5,6}
                                      {4,5,6}

The version for set-systems is A367902, ranks A367906, unlabeled A368095.
The complement for set-systems is A367903, ranks A367907, unlabeled A368094.
For unlabeled multiset partitions we have A368098, complement A368097.
Multisets of this type are ranked by A368100, complement A355529.
For divisors instead of factors we have A368110, complement A355740.
The version for factorizations is A368414, complement A368413.
The complement is counted by A370583.
For a unique choice we have A370584.
The maximal case is A370585.
Partial sums of A370586, complement A370587.
The version for partitions is A370592, complement A370593.
For binary indices instead of factors we have A370636, complement A370637.
A006530 gives greatest prime factor, least A020639.
A027746 lists prime factors, A112798 indices, length A001222.
A307984 counts Q-bases of logarithms of positive integers.
A355741 counts choices of a prime factor of each prime index.
Cf. A000040, A000720, A001055, A001414, A003963, A005117, A045778, A133686, A355739, A355744, A355745, A367905.

Table[Length[Select[Subsets[Range[n]],Length[Select[Tuples[If[#==1,{},First/@FactorInteger[#]]&/@#],UnsameQ@@#&]]>0&]],{n,0,10}]

a(p) = 2 * a(p-1) for prime p. - David A. Corneth, Feb 25 2024

a(n) = 2^n - A370583(n).

a(19) from David A. Corneth, Feb 25 2024

a(20)-a(41) from Alois P. Heinz, Feb 25 2024

A370586 Number of subsets of {1..n} containing n such that it is possible to choose a different prime factor of each element (choosable).

Original entry on oeis.org

0, 0, 1, 2, 2, 6, 8, 20, 12, 20, 44, 116, 88, 320, 380, 508, 264, 1792, 968, 4552, 3136, 5600, 10056, 27896, 11792, 16384, 46688, 19584, 48288, 198528, 110928, 507984, 99648, 463552, 859376, 821136, 470688, 3730368, 4033920, 4651296, 2932512, 19078464

Offset: 0

Gus Wiseman, Feb 26 2024

nonn

			The a(0) = 0 through a(7) = 20 subsets:
  .  .  {2}  {3}    {4}    {5}      {6}      {7}
             {2,3}  {3,4}  {2,5}    {2,6}    {2,7}
                           {3,5}    {3,6}    {3,7}
                           {4,5}    {4,6}    {4,7}
                           {2,3,5}  {5,6}    {5,7}
                           {3,4,5}  {2,5,6}  {6,7}
                                    {3,5,6}  {2,3,7}
                                    {4,5,6}  {2,5,7}
                                             {2,6,7}
                                             {3,4,7}
                                             {3,5,7}
                                             {3,6,7}
                                             {4,5,7}
                                             {4,6,7}
                                             {5,6,7}
                                             {2,3,5,7}
                                             {2,5,6,7}
                                             {3,4,5,7}
                                             {3,5,6,7}
                                             {4,5,6,7}

First differences of A370582, complement A370583, cf. A370584.
Maximal choosable sets are counted by A370585.
The complement is counted by A370587.
For a unique choice we have A370588.
For binary indices instead of prime factors we have A370639.
A006530 gives greatest prime factor, least A020639.
A027746 lists prime factors, indices A112798, length A001222.
A355741 counts choices of a prime factor of each prime index.
A367902 counts choosable set-systems, ranks A367906, unlabeled A368095.
A367903 counts non-choosable set-systems, ranks A367907, unlabeled A368094.
A368098 counts choosable unlabeled multiset partitions, complement A368097.
A368100 ranks choosable multisets, complement A355529.
A368414 counts choosable factorizations, complement A368413.
A370592 counts choosable partitions, complement A370593.
Cf. A000040, A000720, A005117, A045778, A133686, A355739, A355744, A355745, A367771, A367905, A370636.

Table[Length[Select[Subsets[Range[n]], MemberQ[#,n]&&Length[Select[Tuples[If[#==1, {},First/@FactorInteger[#]]&/@#], UnsameQ@@#&]]>0&]],{n,0,10}]

a(19)-a(41) from Alois P. Heinz, Feb 27 2024

A370594 Number of integer partitions of n such that only one set can be obtained by choosing a different prime factor of each part.

Original entry on oeis.org

1, 0, 1, 1, 1, 2, 0, 3, 3, 4, 3, 4, 5, 5, 8, 10, 11, 7, 14, 13, 19, 23, 24, 20, 30, 33, 40, 47, 49, 55, 53, 72, 80, 90, 92, 110, 110, 132, 154, 169, 180, 201, 218, 246, 281, 302, 323, 348, 396, 433, 482, 530, 584, 618, 670, 754, 823, 903, 980, 1047, 1137

Offset: 0

Gus Wiseman, Feb 29 2024

nonn

			The partition (10,6,4) has unique choice (5,3,2) so is counted under a(20).
The a(0) = 1 through a(12) = 5 partitions:
()  .  (2)  (3)  (4)  (5)    .  (7)    (8)    (9)    (6,4)    (11)   (6,6)
                      (3,2)     (4,3)  (5,3)  (5,4)  (7,3)    (7,4)  (7,5)
                                (5,2)  (6,2)  (6,3)  (5,3,2)  (8,3)  (10,2)
                                              (7,2)           (9,2)  (5,4,3)
                                                                     (7,3,2)

The version for set-systems is A367904, ranks A367908.
Multisets of this type are ranked by A368101, cf. A368100, A355529.
The version for subsets is A370584, cf. A370582, A370583, A370586, A370587.
Maximal sets of this type are counted by A370585.
For existence we have A370592.
For nonexistence we have A370593.
For divisors instead of factors we have A370595.
For subsets and binary indices we have A370638, cf. A370636, A370637.
The version for factorizations is A370645, cf. A368414, A368413.
These partitions have ranks A370647.
A006530 gives greatest prime factor, least A020639.
A027746 lists prime factors, A112798 indices, length A001222.
A355741 counts ways to choose a prime factor of each prime index.
Cf. A000040, A000041, A000720, A003963, A355739, A355740, A367905, A368110.

Table[Length[Select[IntegerPartitions[n], Length[Union[Sort/@Select[Tuples[If[#==1, {},First/@FactorInteger[#]]&/@#], UnsameQ@@#&]]]==1&]],{n,0,30}]

A370638 Number of subsets of {1..n} such that a unique set can be obtained by choosing a different binary index of each element.

Original entry on oeis.org

1, 2, 4, 6, 12, 19, 30, 45, 90, 147, 230, 343, 504, 716, 994, 1352, 2704, 4349, 6469, 9162, 12585, 16862, 22122, 28617, 36653, 46431, 58075, 72097, 88456, 107966, 130742, 157647, 315294, 494967, 704753, 950080, 1234301, 1565165, 1945681, 2387060, 2890368, 3470798

Offset: 0

Gus Wiseman, Mar 09 2024

nonn

A binary index of n is any position of a 1 in its reversed binary expansion. The binary indices of n are row n of A048793.

			The set {3,4} has binary indices {{1,2},{3}}, with two choices {1,3}, {2,3}, so is not counted under a(4).
The a(0) = 1 through a(5) = 19 subsets:
  {}  {}   {}     {}     {}       {}
      {1}  {1}    {1}    {1}      {1}
           {2}    {2}    {2}      {2}
           {1,2}  {1,2}  {4}      {4}
                  {1,3}  {1,2}    {1,2}
                  {2,3}  {1,3}    {1,3}
                         {1,4}    {1,4}
                         {2,3}    {1,5}
                         {2,4}    {2,3}
                         {1,2,4}  {2,4}
                         {1,3,4}  {4,5}
                         {2,3,4}  {1,2,4}
                                  {1,2,5}
                                  {1,3,4}
                                  {1,3,5}
                                  {2,3,4}
                                  {2,3,5}
                                  {2,4,5}
                                  {3,4,5}

Wikipedia, Axiom of choice.

Set systems of this type are counted by A367904, ranks A367908.
A version for MM-numbers of multisets is A368101.
For prime indices we have A370584.
This is the unique version of A370636, complement A370637.
The maximal case is A370640, differences A370641.
Factorizations of this type are counted by A370645.
The case A370818 is the restriction to A000225.
A048793 lists binary indices, A000120 length, A272020 reverse, A029931 sum.
A058891 counts set-systems, A003465 covering, A323818 connected.
A070939 gives length of binary expansion.
A096111 gives product of binary indices.
Cf. A133686, A134964, A326031, A326702, A367772, A367867, A367905, A367909, A367912, A368109.

bpe[n_]:=Join@@Position[Reverse[IntegerDigits[n,2]],1];
Table[Length[Select[Subsets[Range[n]],Length[Union[Sort /@ Select[Tuples[bpe/@#],UnsameQ@@#&]]]==1&]],{n,0,10}]

a(2^n - 1) = A370818(n).

More terms from Jinyuan Wang, Mar 28 2025

A370595 Number of integer partitions of n such that only one set can be obtained by choosing a different divisor of each part.

Original entry on oeis.org

1, 1, 0, 1, 2, 0, 3, 2, 4, 3, 4, 5, 8, 9, 8, 13, 12, 17, 16, 27, 28, 33, 36, 39, 50, 58, 65, 75, 93, 94, 112, 125, 148, 170, 190, 209, 250, 273, 305, 341, 403, 432, 484, 561, 623, 708, 765, 873, 977, 1109, 1178, 1367, 1493, 1669, 1824, 2054, 2265, 2521, 2770

Offset: 0

Gus Wiseman, Mar 03 2024

nonn

For example, the only choice for the partition (9,9,6,6,6) is {1,2,3,6,9}.

			The a(1) = 1 through a(15) = 13 partitions (A = 10, B = 11, C = 12, D = 13):
  1  .  21  22  .  33   322  71   441  55    533   B1    553   77    933
            31     51   421  332  522  442   722   444   733   D1    B22
                   321       422  531  721   731   552   751   B21   B31
                             521       4321  4322  4332  931   4433  4443
                                             5321  4431  4432  5441  5442
                                                   5322  5332  6332  5532
                                                   5421  5422  7322  6621
                                                   6321  6322  7421  7332
                                                         7321        7422
                                                                     7521
                                                                     8421
                                                                     9321
                                                                     54321

For no choices we have A370320, complement A239312.
The version for prime factors (not all divisors) is A370594, ranks A370647.
For multiple choices we have A370803, ranks A370811.
These partitions have ranks A370810.
A000005 counts divisors.
A000041 counts integer partitions, strict A000009.
A027746 lists prime factors, A112798 indices, length A001222.
A355731 counts choices of a divisor of each prime index, firsts A355732.
A355741, A355744, A355745 choose prime factors of prime indices.
A370592 counts partitions with choosable prime factors, ranks A368100.
A370593 counts partitions without choosable prime factors, ranks A355529.
A370804 counts non-condensed partitions with no ones, complement A370805.
A370814 counts factorizations with choosable divisors, complement A370813.
Cf. A355535, A355739, A355740, A367867, A367904, A368110, A370583, A370584, A370806, A370808.

Table[Length[Select[IntegerPartitions[n],Length[Union[Sort /@ Select[Tuples[Divisors/@#],UnsameQ@@#&]]]==1&]],{n,0,30}]

More terms from Jinyuan Wang, Feb 14 2025

A370587 Number of subsets of {1..n} containing n such that it is not possible to choose a different prime factor of each element (non-choosable).

Original entry on oeis.org

0, 1, 1, 2, 6, 10, 24, 44, 116, 236, 468, 908, 1960, 3776, 7812, 15876, 32504, 63744, 130104, 257592, 521152, 1042976, 2087096, 4166408, 8376816, 16760832, 33507744, 67089280, 134169440, 268236928, 536759984, 1073233840, 2147384000, 4294503744, 8589075216, 17179048048

Offset: 0

Gus Wiseman, Feb 28 2024

nonn

			The a(0) = 0 through a(5) = 10 subsets:
  .  {1}  {1,2}  {1,3}    {1,4}      {1,5}
                 {1,2,3}  {2,4}      {1,2,5}
                          {1,2,4}    {1,3,5}
                          {1,3,4}    {1,4,5}
                          {2,3,4}    {2,4,5}
                          {1,2,3,4}  {1,2,3,5}
                                     {1,2,4,5}
                                     {1,3,4,5}
                                     {2,3,4,5}
                                     {1,2,3,4,5}

First differences of A370583, complement A370582, cf. A370584.
The complement is counted by A370586.
For a unique choice we have A370588.
For binary indices instead of factors we have A370639, complement A370589.
A006530 gives greatest prime factor, least A020639.
A027746 lists prime factors, indices A112798, length A001222.
A355741 counts choices of a prime factor of each prime index.
A367902 counts choosable set-systems, ranks A367906, unlabeled A368095.
A367903 counts non-choosable set-systems, ranks A367907, unlabeled A368094.
A368098 counts choosable unlabeled multiset partitions, complement A368097.
A368100 ranks choosable multisets, complement A355529.
A368414 counts choosable factorizations, complement A368413.
A370585 counts maximal choosable sets.
A370592 counts choosable partitions, complement A370593.
Cf. A000040, A000720, A005117, A045778, A133686, A355739, A355744, A355745, A367905, A370636.

Table[Length[Select[Subsets[Range[n]],MemberQ[#,n] && Length[Select[Tuples[If[#==1,{},First/@FactorInteger[#]]&/@#], UnsameQ@@#&]]==0&]],{n,0,10}]

More terms from Jinyuan Wang, Mar 28 2025

cp's OEIS Frontend

A239312 Number of condensed integer partitions of n.

Views

Author

Keywords

Comments

Examples

Links

Crossrefs

Programs

Maple

Mathematica

Extensions

A370320 Number of non-condensed integer partitions of n, or partitions where it is not possible to choose a different divisor of each part.

Views

Author

Keywords

Comments

Examples

Crossrefs

Programs

Mathematica

Extensions

A370583 Number of subsets of {1..n} such that it is not possible to choose a different prime factor of each element.

Views

Author

Keywords

Examples

Crossrefs

Programs

Mathematica

Formula

Extensions

A370585 Number of maximal subsets of {1..n} such that it is possible to choose a different prime factor of each element.

Views

Author

Keywords

Comments

Examples

Crossrefs

Programs

Mathematica

Extensions

A370582 Number of subsets of {1..n} such that it is possible to choose a different prime factor of each element.

Views

Author

Keywords

Examples

Crossrefs

Programs

Mathematica

Formula

Extensions

A370586 Number of subsets of {1..n} containing n such that it is possible to choose a different prime factor of each element (choosable).

Views

Author

Keywords

Examples

Crossrefs

Programs

Mathematica

Extensions

A370594 Number of integer partitions of n such that only one set can be obtained by choosing a different prime factor of each part.

Views

Author

Keywords

Examples

Crossrefs

Programs

Mathematica

A370638 Number of subsets of {1..n} such that a unique set can be obtained by choosing a different binary index of each element.

Views

Author

Keywords

Comments

Examples

Links

Crossrefs

Programs

Mathematica