cp's OEIS Frontend

This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.

Previous Showing 21-30 of 36 results. Next

A320426 Number of nonempty pairwise coprime subsets of {1,...,n}, where a single number is not considered to be pairwise coprime unless it is equal to 1.

Original entry on oeis.org

1, 2, 5, 8, 19, 22, 49, 64, 95, 106, 221, 236, 483, 530, 601, 712, 1439, 1502, 3021, 3212, 3595, 3850, 7721, 7976, 11143, 11878, 14629, 15460, 30947, 31202, 62433, 69856, 76127, 80222, 89821, 91612, 183259, 192602, 208601, 214232, 428503, 431574, 863189
Offset: 1

Views

Author

Gus Wiseman, Jan 08 2019

Keywords

Comments

Two or more numbers are pairwise coprime if no pair of them has a common divisor > 1.

Examples

			The a(4) = 8 subsets of {1,2,3,4} are {1}, {1,2}, {1,3}, {1,4}, {2,3}, {3,4}, {1,2,3}, {1,3,4}. - _Michael B. Porter_, Jan 12 2019
From _Gus Wiseman_, May 09 2021: (Start)
The a(2) = 2 through a(6) = 22 sets:
   {1}     {1}      {1}       {1}        {1}
  {1,2}   {1,2}    {1,2}     {1,2}      {1,2}
          {1,3}    {1,3}     {1,3}      {1,3}
          {2,3}    {1,4}     {1,4}      {1,4}
         {1,2,3}   {2,3}     {1,5}      {1,5}
                   {3,4}     {2,3}      {1,6}
                  {1,2,3}    {2,5}      {2,3}
                  {1,3,4}    {3,4}      {2,5}
                             {3,5}      {3,4}
                             {4,5}      {3,5}
                            {1,2,3}     {4,5}
                            {1,2,5}     {5,6}
                            {1,3,4}    {1,2,3}
                            {1,3,5}    {1,2,5}
                            {1,4,5}    {1,3,4}
                            {2,3,5}    {1,3,5}
                            {3,4,5}    {1,4,5}
                           {1,2,3,5}   {1,5,6}
                           {1,3,4,5}   {2,3,5}
                                       {3,4,5}
                                      {1,2,3,5}
                                      {1,3,4,5}
(End)
		

Crossrefs

The case of pairs is A015614.
The case with singletons is A187106.
The version without singletons (except {1}) is A276187.
Row sums of A320436.
The version for divisors > 1 is A343654.
The version for divisors without singletons is A343655.
The maximal version is A343659.
A018892 counts coprime unordered pairs of divisors.
A051026 counts pairwise indivisible subsets of {1...n}.
A087087 ranks pairwise coprime subsets of {1...n}.
A326675 ranks pairwise coprime non-singleton subsets of {1...n}.

Programs

  • Mathematica
    Table[Length[Select[Subsets[Range[n]],CoprimeQ@@#&]],{n,10}]

Formula

a(n) = A187106(n) - n + 1 = A084422(n) - n.
a(n) = A276187(n) + 1. - Gus Wiseman, May 08 2021

Extensions

a(25)-a(43) from Alois P. Heinz, Jan 08 2019

A337562 Number of pairwise coprime strict compositions of n, where a singleton is always considered coprime.

Original entry on oeis.org

1, 1, 1, 3, 3, 5, 9, 7, 17, 13, 23, 41, 41, 67, 49, 75, 75, 155, 211, 229, 243, 241, 287, 395, 807, 537, 841, 655, 1147, 1619, 2037, 2551, 2213, 2007, 2663, 4579, 4171, 7123, 4843, 6013, 6215, 11639, 13561, 16489, 14739, 15445, 16529, 25007, 41003, 32803
Offset: 0

Views

Author

Gus Wiseman, Sep 20 2020

Keywords

Examples

			The a(1) = 1 through a(9) = 12 compositions:
  (1)  (2)  (3)    (4)    (5)    (6)      (7)    (8)      (9)
            (1,2)  (1,3)  (1,4)  (1,5)    (1,6)  (1,7)    (1,8)
            (2,1)  (3,1)  (2,3)  (5,1)    (2,5)  (3,5)    (2,7)
                          (3,2)  (1,2,3)  (3,4)  (5,3)    (4,5)
                          (4,1)  (1,3,2)  (4,3)  (7,1)    (5,4)
                                 (2,1,3)  (5,2)  (1,2,5)  (7,2)
                                 (2,3,1)  (6,1)  (1,3,4)  (8,1)
                                 (3,1,2)         (1,4,3)  (1,3,5)
                                 (3,2,1)         (1,5,2)  (1,5,3)
                                                 (2,1,5)  (3,1,5)
                                                 (2,5,1)  (3,5,1)
                                                 (3,1,4)  (5,1,3)
                                                 (3,4,1)  (5,3,1)
                                                 (4,1,3)
                                                 (4,3,1)
                                                 (5,1,2)
                                                 (5,2,1)
		

Crossrefs

A007360 is the unordered version, with non-strict version A051424.
A101268 is the not necessarily strict version.
A220377*6 counts these compositions of length 3.
A337561 does not consider a singleton to be coprime unless it is (1), with non-strict version A337462.
A337664 looks only at distinct parts.
A000740 counts relatively prime compositions, with strict case A332004.
A072706 counts unimodal strict compositions.
A178472 counts compositions with a common factor.
A327516 counts pairwise coprime partitions, with strict case A305713.
A328673 counts pairwise non-coprime partitions.
A333228 ranks compositions whose distinct parts are pairwise coprime.

Programs

  • Mathematica
    Table[Length[Select[Join@@Permutations/@IntegerPartitions[n],UnsameQ@@#&&(Length[#]<=1||CoprimeQ@@#)&]],{n,0,10}]

Formula

a(n > 1) = A337561(n) + 1 for n > 1.

A343652 Number of maximal pairwise coprime sets of divisors of n.

Original entry on oeis.org

1, 1, 1, 2, 1, 2, 1, 3, 2, 2, 1, 4, 1, 2, 2, 4, 1, 4, 1, 4, 2, 2, 1, 6, 2, 2, 3, 4, 1, 5, 1, 5, 2, 2, 2, 8, 1, 2, 2, 6, 1, 5, 1, 4, 4, 2, 1, 8, 2, 4, 2, 4, 1, 6, 2, 6, 2, 2, 1, 10, 1, 2, 4, 6, 2, 5, 1, 4, 2, 5, 1, 12, 1, 2, 4, 4, 2, 5, 1, 8, 4, 2, 1, 10, 2, 2
Offset: 1

Views

Author

Gus Wiseman, Apr 25 2021

Keywords

Comments

Also the number of maximal pairwise coprime sets of divisors > 1 of n. For example, the a(n) sets for n = 12, 30, 36, 60, 120 are:
{6} {30} {6} {30} {30}
{12} {2,15} {12} {60} {60}
{2,3} {3,10} {18} {2,15} {120}
{3,4} {5,6} {36} {3,10} {2,15}
{2,3,5} {2,3} {3,20} {3,10}
{2,9} {4,15} {3,20}
{3,4} {5,6} {3,40}
{4,9} {5,12} {4,15}
{2,3,5} {5,6}
{3,4,5} {5,12}
{5,24}
{8,15}
{2,3,5}
{3,4,5}
{3,5,8}

Examples

			The a(n) sets for n = 12, 30, 36, 60, 120:
  {1,6}    {1,30}     {1,6}    {1,30}     {1,30}
  {1,12}   {1,2,15}   {1,12}   {1,60}     {1,60}
  {1,2,3}  {1,3,10}   {1,18}   {1,2,15}   {1,120}
  {1,3,4}  {1,5,6}    {1,36}   {1,3,10}   {1,2,15}
           {1,2,3,5}  {1,2,3}  {1,3,20}   {1,3,10}
                      {1,2,9}  {1,4,15}   {1,3,20}
                      {1,3,4}  {1,5,6}    {1,3,40}
                      {1,4,9}  {1,5,12}   {1,4,15}
                               {1,2,3,5}  {1,5,6}
                               {1,3,4,5}  {1,5,12}
                                          {1,5,24}
                                          {1,8,15}
                                          {1,2,3,5}
                                          {1,3,4,5}
                                          {1,3,5,8}
		

Crossrefs

The case of pairs is A063647.
The case of triples is A066620.
The non-maximal version counting empty sets and singletons is A225520.
The non-maximal version with no 1's is A343653.
The non-maximal version is A343655.
The version for subsets of {1..n} is A343659.
The case without 1's or singletons is A343660.
A018892 counts pairwise coprime unordered pairs of divisors.
A048691 counts pairwise coprime ordered pairs of divisors.
A048785 counts pairwise coprime ordered triples of divisors.
A084422, A187106, A276187, and A320426 count pairwise coprime sets.
A100565 counts pairwise coprime unordered triples of divisors.
A305713 counts pairwise coprime non-singleton strict partitions.
A324837 counts minimal subsets of {1...n} with least common multiple n.
A325683 counts maximal Golomb rulers.
A326077 counts maximal pairwise indivisible sets.

Programs

  • Mathematica
    fasmax[y_]:=Complement[y,Union@@Most@*Subsets/@y];
    Table[Length[fasmax[Select[Subsets[Divisors[n]],CoprimeQ@@#&]]],{n,100}]

Formula

a(n) = A343660(n) + A005361(n).

A335236 Numbers k such that the k-th composition in standard order (A066099) is not a singleton nor pairwise coprime.

Original entry on oeis.org

0, 10, 21, 22, 26, 34, 36, 40, 42, 43, 45, 46, 53, 54, 58, 69, 70, 73, 74, 76, 81, 82, 84, 85, 86, 87, 88, 90, 91, 93, 94, 98, 100, 104, 106, 107, 109, 110, 117, 118, 122, 130, 136, 138, 139, 141, 142, 146, 147, 148, 149, 150, 153, 154, 156, 160, 162, 163, 164
Offset: 1

Views

Author

Gus Wiseman, May 28 2020

Keywords

Comments

These are compositions whose product is strictly greater than the LCM of their parts.
The k-th composition in standard order (graded reverse-lexicographic, A066099) is obtained by taking the set of positions of 1's in the reversed binary expansion of k, prepending 0, taking first differences, and reversing again. This gives a bijective correspondence between nonnegative integers and integer compositions.

Examples

			The sequence together with the corresponding compositions begins:
    0: ()            74: (3,2,2)        109: (1,2,1,2,1)
   10: (2,2)         76: (3,1,3)        110: (1,2,1,1,2)
   21: (2,2,1)       81: (2,4,1)        117: (1,1,2,2,1)
   22: (2,1,2)       82: (2,3,2)        118: (1,1,2,1,2)
   26: (1,2,2)       84: (2,2,3)        122: (1,1,1,2,2)
   34: (4,2)         85: (2,2,2,1)      130: (6,2)
   36: (3,3)         86: (2,2,1,2)      136: (4,4)
   40: (2,4)         87: (2,2,1,1,1)    138: (4,2,2)
   42: (2,2,2)       88: (2,1,4)        139: (4,2,1,1)
   43: (2,2,1,1)     90: (2,1,2,2)      141: (4,1,2,1)
   45: (2,1,2,1)     91: (2,1,2,1,1)    142: (4,1,1,2)
   46: (2,1,1,2)     93: (2,1,1,2,1)    146: (3,3,2)
   53: (1,2,2,1)     94: (2,1,1,1,2)    147: (3,3,1,1)
   54: (1,2,1,2)     98: (1,4,2)        148: (3,2,3)
   58: (1,1,2,2)    100: (1,3,3)        149: (3,2,2,1)
   69: (4,2,1)      104: (1,2,4)        150: (3,2,1,2)
   70: (4,1,2)      106: (1,2,2,2)      153: (3,1,3,1)
   73: (3,3,1)      107: (1,2,2,1,1)    154: (3,1,2,2)
		

Crossrefs

The version for prime indices is A316438.
The version for binary indices is A335237.
The complement is A335235.
The version with singletons allowed is A335239.
Binary indices are pairwise coprime or a singleton: A087087.
The version counting partitions is 1 + A335240.
All of the following pertain to compositions in standard order:
- Length is A000120.
- The parts are row k of A066099.
- Sum is A070939.
- Product is A124758.
- Reverse is A228351
- GCD is A326674.
- Heinz number is A333219.
- LCM is A333226.

Programs

  • Mathematica
    stc[n_]:=Differences[Prepend[Join@@Position[Reverse[IntegerDigits[n,2]],1],0]]//Reverse;
    Select[Range[0,100],!(Length[stc[#]]==1||CoprimeQ@@stc[#])&]

A276187 Number of subsets of {1,..,n} of cardinality >= 2 such that the elements of each counted subset are pairwise coprime.

Original entry on oeis.org

0, 1, 4, 7, 18, 21, 48, 63, 94, 105, 220, 235, 482, 529, 600, 711, 1438, 1501, 3020, 3211, 3594, 3849, 7720, 7975, 11142, 11877, 14628, 15459, 30946, 31201, 62432, 69855, 76126, 80221, 89820, 91611, 183258, 192601, 208600, 214231, 428502, 431573, 863188, 900563
Offset: 1

Views

Author

Robert C. Lyons, Aug 23 2016

Keywords

Comments

n is prime if and only if a(n) = 2*a(n-1)+n-1. - Robert Israel, Aug 24 2016

Examples

			From _Gus Wiseman_, May 08 2021: (Start)
The a(2) = 1 through a(6) = 21 sets:
  {1,2}   {1,2}    {1,2}     {1,2}      {1,2}
          {1,3}    {1,3}     {1,3}      {1,3}
          {2,3}    {1,4}     {1,4}      {1,4}
         {1,2,3}   {2,3}     {1,5}      {1,5}
                   {3,4}     {2,3}      {1,6}
                  {1,2,3}    {2,5}      {2,3}
                  {1,3,4}    {3,4}      {2,5}
                             {3,5}      {3,4}
                             {4,5}      {3,5}
                            {1,2,3}     {4,5}
                            {1,2,5}     {5,6}
                            {1,3,4}    {1,2,3}
                            {1,3,5}    {1,2,5}
                            {1,4,5}    {1,3,4}
                            {2,3,5}    {1,3,5}
                            {3,4,5}    {1,4,5}
                           {1,2,3,5}   {1,5,6}
                           {1,3,4,5}   {2,3,5}
                                       {3,4,5}
                                      {1,2,3,5}
                                      {1,3,4,5}
(End)
		

Crossrefs

The case of pairs is A015614.
The indivisible instead of coprime version is A051026(n) - n.
Allowing empty sets and singletons gives A084422.
The relatively prime instead of pairwise coprime version is A085945(n) - 1.
Allowing all singletons gives A187106.
Allowing only the singleton {1} gives A320426.
Row sums of A320436, each minus one.
The maximal case is counted by A343659.
The version for sets of divisors is A343655(n) - 1.
A000005 counts divisors.
A186972 counts pairwise coprime k-sets containing n.
A186974 counts pairwise coprime k-sets.
A326675 ranks pairwise coprime non-singleton sets.

Programs

  • Maple
    f:= proc(S) option remember;
        local s, Sp;
        if S = {} then return 1 fi;
        s:= S[-1];
        Sp:= S[1..-2];
        procname(Sp) + procname(select(t -> igcd(t,s)=1, Sp))
    end proc:
    seq(f({$1..n}) - n - 1, n=1..50); # Robert Israel, Aug 24 2016
  • Mathematica
    f[S_] := f[S] = Module[{s, Sp}, If[S == {}, Return[1]]; s = S[[-1]]; Sp = S[[1;;-2]]; f[Sp] + f[Select[Sp, GCD[#, s] == 1&]]];
    Table[f[Range[n]] - n - 1, {n, 1, 50}] (* Jean-François Alcover, Sep 15 2022, after Robert Israel *)
  • PARI
    f(n,k=1)=if(n==1, return(2)); if(gcd(k,n)==1, f(n-1,n*k)) + f(n-1,k)
    a(n)=f(n)-n-1 \\ Charles R Greathouse IV, Aug 24 2016
  • Sage
    from sage.combinat.subsets_pairwise import PairwiseCompatibleSubsets
    def is_coprime(x, y): return gcd(x, y) == 1
    max_n = 40
    seq = []
    for n in range(1, max_n+1):
        P = PairwiseCompatibleSubsets(range(1,n+1), is_coprime)
        a_n = len([1 for s in P.list() if len(s) > 1])
        seq.append(a_n)
    print(seq)
    

Formula

a(n) = A320426(n) - 1. - Gus Wiseman, May 08 2021

Extensions

Name and example edited by Robert Israel, Aug 24 2016

A335239 Numbers k such that the k-th composition in standard-order (A066099) does not have all pairwise coprime parts, where a singleton is not coprime unless it is (1).

Original entry on oeis.org

0, 2, 4, 8, 10, 16, 21, 22, 26, 32, 34, 36, 40, 42, 43, 45, 46, 53, 54, 58, 64, 69, 70, 73, 74, 76, 81, 82, 84, 85, 86, 87, 88, 90, 91, 93, 94, 98, 100, 104, 106, 107, 109, 110, 117, 118, 122, 128, 130, 136, 138, 139, 141, 142, 146, 147, 148, 149, 150, 153
Offset: 1

Views

Author

Gus Wiseman, May 28 2020

Keywords

Comments

We use the Mathematica definition for CoprimeQ, so a singleton is not considered coprime unless it is (1).
The k-th composition in standard order (graded reverse-lexicographic, A066099) is obtained by taking the set of positions of 1's in the reversed binary expansion of k, prepending 0, taking first differences, and reversing again. This gives a bijective correspondence between nonnegative integers and integer compositions.

Examples

			The sequence together with the corresponding compositions begins:
    0: ()            45: (2,1,2,1)     86: (2,2,1,2)
    2: (2)           46: (2,1,1,2)     87: (2,2,1,1,1)
    4: (3)           53: (1,2,2,1)     88: (2,1,4)
    8: (4)           54: (1,2,1,2)     90: (2,1,2,2)
   10: (2,2)         58: (1,1,2,2)     91: (2,1,2,1,1)
   16: (5)           64: (7)           93: (2,1,1,2,1)
   21: (2,2,1)       69: (4,2,1)       94: (2,1,1,1,2)
   22: (2,1,2)       70: (4,1,2)       98: (1,4,2)
   26: (1,2,2)       73: (3,3,1)      100: (1,3,3)
   32: (6)           74: (3,2,2)      104: (1,2,4)
   34: (4,2)         76: (3,1,3)      106: (1,2,2,2)
   36: (3,3)         81: (2,4,1)      107: (1,2,2,1,1)
   40: (2,4)         82: (2,3,2)      109: (1,2,1,2,1)
   42: (2,2,2)       84: (2,2,3)      110: (1,2,1,1,2)
   43: (2,2,1,1)     85: (2,2,2,1)    117: (1,1,2,2,1)
		

Crossrefs

The complement is A333227.
The version without singletons is A335236.
Ignoring repeated parts gives A335238.
Singleton or pairwise coprime partitions are counted by A051424.
Singleton or pairwise coprime sets are ranked by A087087.
Numbers whose binary indices are pairwise coprime are A326675.
Coprime partitions are counted by A327516.
Non-coprime partitions are counted by A335240.
All of the following pertain to compositions in standard order (A066099):
- Length is A000120.
- Sum is A070939.
- Product is A124758.
- Reverse is A228351
- GCD is A326674.
- Heinz number is A333219.
- LCM is A333226.
- Coprime compositions are A333227.
- Compositions whose distinct parts are coprime are A333228.
- Number of distinct parts is A334028.

Programs

  • Mathematica
    stc[n_]:=Differences[Prepend[Join@@Position[Reverse[IntegerDigits[n,2]],1],0]]//Reverse;
    Select[Range[0,100],!CoprimeQ@@stc[#]&]

A335240 Number of integer partitions of n that are not pairwise coprime, where a singleton is not coprime unless it is (1).

Original entry on oeis.org

1, 0, 1, 1, 2, 2, 5, 6, 11, 16, 25, 34, 51, 69, 98, 134, 181, 238, 316, 410, 536, 691, 887, 1122, 1423, 1788, 2246, 2800, 3483, 4300, 5304, 6508, 7983, 9745, 11869, 14399, 17436, 21040, 25367, 30482, 36568, 43735, 52239, 62239, 74073, 87950, 104277, 123348
Offset: 0

Views

Author

Gus Wiseman, May 30 2020

Keywords

Comments

We use the Mathematica definition for CoprimeQ, so a singleton is not considered coprime unless it is (1).
These are also partitions that are a singleton or whose product is strictly greater than the LCM of their parts.

Examples

			The a(2) = 1 through a(9) = 16 partitions:
  (2)  (3)  (4)   (5)    (6)     (7)      (8)       (9)
            (22)  (221)  (33)    (322)    (44)      (63)
                         (42)    (331)    (62)      (333)
                         (222)   (421)    (332)     (432)
                         (2211)  (2221)   (422)     (441)
                                 (22111)  (2222)    (522)
                                          (3221)    (621)
                                          (3311)    (3222)
                                          (4211)    (3321)
                                          (22211)   (4221)
                                          (221111)  (22221)
                                                    (32211)
                                                    (33111)
                                                    (42111)
                                                    (222111)
                                                    (2211111)
		

Crossrefs

The version for relatively prime instead of coprime is A018783.
The Heinz numbers of these partitions are the complement of A302696.
The complement is counted by A327516.
Singleton or pairwise coprime partitions are counted by A051424.
Singleton or pairwise coprime sets are ranked by A087087.
Numbers whose binary indices are pairwise coprime are A326675.
All of the following pertain to compositions in standard order (A066099):
- GCD is A326674.
- LCM is A333226.
- Coprime compositions are A333227.
- Compositions whose distinct parts are coprime are A333228.
- Non-coprime compositions are A335239.

Programs

  • Mathematica
    Table[Length[Select[IntegerPartitions[n],!CoprimeQ@@#&]],{n,0,30}]

A059519 Number of partitions of n all of whose subpartitions sum to distinct values. Partition(n) = [a, b, c...] where 2n = 2^a + 2^b + 2^c + ...

Original entry on oeis.org

1, 2, 3, 4, 5, 6, 8, 9, 10, 11, 12, 14, 16, 17, 18, 19, 20, 21, 24, 26, 28, 32, 33, 34, 35, 36, 37, 38, 40, 41, 44, 48, 50, 52, 56, 64, 65, 66, 67, 68, 69, 70, 72, 73, 74, 80, 81, 84, 88, 96, 98, 100, 104, 112, 116, 128, 129, 130, 131, 132, 133, 134, 136, 137, 138, 139, 140
Offset: 1

Views

Author

Marc LeBrun, Jan 19 2001

Keywords

Comments

Partition encoding as in A029931. Complement of A059520.
From Gus Wiseman, Jul 22 2019: (Start)
These are numbers whose positions of 1's in their reversed binary expansion form a strict knapsack partition (A275972). The initial terms together with their corresponding partitions are:
1: (1)
2: (2)
3: (2,1)
4: (3)
5: (3,1)
6: (3,2)
8: (4)
9: (4,1)
10: (4,2)
11: (4,2,1)
12: (4,3)
14: (4,3,2)
16: (5)
17: (5,1)
18: (5,2)
19: (5,2,1)
20: (5,3)
(End)

Examples

			14=2+4+8 so Partition(14) = [2,3,4], whose sub-sums are 0,2,3,4,5,6,7 and 14.
		

Crossrefs

Other sequences classifying numbers by their binary indices: A291166 (relatively prime), A295235 (arithmetic progression), A326669 (integer average), A326675 (pairwise coprime).

Programs

  • Mathematica
    bpe[n_]:=Join@@Position[Reverse[IntegerDigits[n,2]],1];
    Select[Range[100],UnsameQ@@Total/@Subsets[bpe[#]]&] (* Gus Wiseman, Jul 22 2019 *)

A343655 Number of pairwise coprime sets of divisors of n, where a singleton is not considered pairwise coprime unless it is {1}.

Original entry on oeis.org

1, 2, 2, 3, 2, 6, 2, 4, 3, 6, 2, 10, 2, 6, 6, 5, 2, 10, 2, 10, 6, 6, 2, 14, 3, 6, 4, 10, 2, 22, 2, 6, 6, 6, 6, 17, 2, 6, 6, 14, 2, 22, 2, 10, 10, 6, 2, 18, 3, 10, 6, 10, 2, 14, 6, 14, 6, 6, 2, 38, 2, 6, 10, 7, 6, 22, 2, 10, 6, 22, 2, 24, 2, 6, 10, 10, 6, 22, 2
Offset: 1

Views

Author

Gus Wiseman, Apr 26 2021

Keywords

Comments

First differs from A015995 at a(210) = 88, A015995(210) = 86.

Examples

			For example, the a(n) subsets for n = 1, 2, 4, 6, 8, 12, 16, 24 are:
  {1}  {1}    {1}    {1}      {1}    {1}      {1}     {1}
       {1,2}  {1,2}  {1,2}    {1,2}  {1,2}    {1,2}   {1,2}
              {1,4}  {1,3}    {1,4}  {1,3}    {1,4}   {1,3}
                     {1,6}    {1,8}  {1,4}    {1,8}   {1,4}
                     {2,3}           {1,6}    {1,16}  {1,6}
                     {1,2,3}         {2,3}            {1,8}
                                     {3,4}            {2,3}
                                     {1,12}           {3,4}
                                     {1,2,3}          {3,8}
                                     {1,3,4}          {1,12}
                                                      {1,24}
                                                      {1,2,3}
                                                      {1,3,4}
                                                      {1,3,8}
		

Crossrefs

The case of pairs is A063647.
The case of triples is A066620.
The version with empty sets and singletons is A225520.
A version for prime indices is A304711.
The version for strict integer partitions is A305713.
The version for subsets of {1..n} is A320426 = A276187 + 1.
The version for binary indices is A326675.
The version for integer partitions is A327516.
The version for standard compositions is A333227.
The maximal case is A343652.
The case without 1's is A343653.
The case without 1's with singletons is A343654.
The maximal case without 1's is A343660.
A018892 counts coprime unordered pairs of divisors.
A051026 counts pairwise indivisible subsets of {1..n}.
A100565 counts pairwise coprime unordered triples of divisors.
A325683 counts maximal Golomb rulers.
A326077 counts maximal pairwise indivisible sets.

Programs

  • Mathematica
    Table[Length[Select[Subsets[Divisors[n]],CoprimeQ@@#&]],{n,100}]

A335237 Numbers whose binary indices are not a singleton nor pairwise coprime.

Original entry on oeis.org

0, 10, 11, 14, 15, 26, 27, 30, 31, 34, 35, 36, 37, 38, 39, 40, 41, 42, 43, 44, 45, 46, 47, 50, 51, 52, 53, 54, 55, 56, 57, 58, 59, 60, 61, 62, 63, 74, 75, 78, 79, 90, 91, 94, 95, 98, 99, 100, 101, 102, 103, 104, 105, 106, 107, 108, 109, 110, 111, 114, 115, 116
Offset: 1

Views

Author

Gus Wiseman, May 28 2020

Keywords

Comments

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.

Examples

			The sequence of terms together with their binary expansions and binary indices begins:
    0:       0 ~ {}
   10:    1010 ~ {2,4}
   11:    1011 ~ {1,2,4}
   14:    1110 ~ {2,3,4}
   15:    1111 ~ {1,2,3,4}
   26:   11010 ~ {2,4,5}
   27:   11011 ~ {1,2,4,5}
   30:   11110 ~ {2,3,4,5}
   31:   11111 ~ {1,2,3,4,5}
   34:  100010 ~ {2,6}
   35:  100011 ~ {1,2,6}
   36:  100100 ~ {3,6}
   37:  100101 ~ {1,3,6}
   38:  100110 ~ {2,3,6}
   39:  100111 ~ {1,2,3,6}
   40:  101000 ~ {4,6}
   41:  101001 ~ {1,4,6}
   42:  101010 ~ {2,4,6}
   43:  101011 ~ {1,2,4,6}
   44:  101100 ~ {3,4,6}
		

Crossrefs

The version for prime indices is A316438.
The version for standard compositions is A335236.
Numbers whose binary indices are pairwise coprime or a singleton: A087087.
Non-coprime partitions are counted by A335240.
All of the following pertain to compositions in standard order (A066099):
- Length is A000120.
- Sum is A070939.
- Product is A124758.
- Reverse is A228351
- GCD is A326674.
- Heinz number is A333219.
- LCM is A333226.

Programs

  • Mathematica
    bpe[n_]:=Join@@Position[Reverse[IntegerDigits[n,2]],1];
    Select[Range[0,100],!(Length[bpe[#]]==1||CoprimeQ@@bpe[#])&]

Formula

Complement in A001477 of A326675 and A000079.
Previous Showing 21-30 of 36 results. Next