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 11-13 of 13 results.

A327058 Number of pairwise intersecting set-systems covering n vertices whose dual is a weak antichain.

Original entry on oeis.org

1, 1, 1, 3, 155
Offset: 0

Views

Author

Gus Wiseman, Aug 18 2019

Keywords

Comments

A set-system is a finite set of finite nonempty sets. Its elements are sometimes called edges. The dual of a set-system has, for each vertex, one edge consisting of the indices (or positions) of the edges containing that vertex. For example, the dual of {{1,2},{2,3}} is {{1},{1,2},{2}}. A weak antichain is a multiset of sets, none of which is a proper subset of any other.

Examples

			The a(0) = 1 through a(3) = 3 set-systems:
  {}  {{1}}  {{12}}  {{123}}
                     {{12}{13}{23}}
                     {{12}{13}{23}{123}}

Crossrefs

Covering intersecting set-systems are A305843.
The BII-numbers of these set-systems are the intersection of A326910 and A326966.
Covering coantichains are A326970.
The non-covering version is A327059.
The unlabeled multiset partition version is A327060.
Cf. A006126, A051185, A059523, A305844, A319639, A326961, A326965, A326968, A327020, A327057.

Programs

  • Mathematica
    dual[eds_]:=Table[First/@Position[eds,x],{x,Union@@eds}];
stableSets[u_,Q_]:=If[Length[u]==0,{{}},With[{w=First[u]},Join[stableSets[DeleteCases[u,w],Q],Prepend[#,w]&/@stableSets[DeleteCases[u,r_/;r==w||Q[r,w]||Q[w,r]],Q]]]];
stableQ[u_,Q_]:=!Apply[Or,Outer[#1=!=#2&&Q[#1,#2]&,u,u,1],{0,1}];
Table[Length[Select[stableSets[Subsets[Range[n],{1,n}],Intersection[#1,#2]=={}&],Union@@#==Range[n]&&stableQ[dual[#],SubsetQ]&]],{n,0,3}]

Formula

Inverse binomial transform of A327059.

A327018 Number of non-isomorphic set-systems of weight n whose dual is a weak antichain.

Original entry on oeis.org

1, 1, 2, 3, 6, 8, 17, 24, 51, 80, 180
Offset: 0

Views

Author

Gus Wiseman, Aug 15 2019

Keywords

Comments

A set-system is a finite set of finite nonempty sets. The dual of a set-system has, for each vertex, one edge consisting of the indices (or positions) of the edges containing that vertex. For example, the dual of {{1,2},{2,3}} is {{1},{1,2},{2}}. A weak antichain is a multiset of sets, none of which is a proper subset of any other.

Examples

			Non-isomorphic representatives of the a(1) = 1 through a(6) = 17 multiset partitions:
  {1}  {12}    {123}      {1234}        {12345}          {123456}
       {1}{2}  {1}{23}    {1}{234}      {1}{2345}        {1}{23456}
               {1}{2}{3}  {12}{34}      {12}{345}        {12}{3456}
                          {1}{2}{12}    {1}{2}{345}      {123}{456}
                          {1}{2}{34}    {1}{23}{45}      {12}{13}{23}
                          {1}{2}{3}{4}  {1}{2}{3}{23}    {1}{23}{123}
                                        {1}{2}{3}{45}    {1}{2}{3456}
                                        {1}{2}{3}{4}{5}  {1}{23}{456}
                                                         {12}{34}{56}
                                                         {1}{2}{13}{23}
                                                         {1}{2}{3}{123}
                                                         {1}{2}{3}{456}
                                                         {1}{2}{34}{56}
                                                         {3}{4}{12}{34}
                                                         {1}{2}{3}{4}{34}
                                                         {1}{2}{3}{4}{56}
                                                         {1}{2}{3}{4}{5}{6}

Crossrefs

Cf. A007716, A283877, A293993, A319643, A319721, A326966, A326968, A326970, A326972, A326973, A326974, A326975, A326978, A327017, A327019.

A327059 Number of pairwise intersecting set-systems covering a subset of {1..n} whose dual is a weak antichain.

Original entry on oeis.org

1, 2, 4, 10, 178
Offset: 0

Views

Author

Gus Wiseman, Aug 18 2019

Keywords

Comments

A set-system is a finite set of finite nonempty sets. Its elements are sometimes called edges. The dual of a set-system has, for each vertex, one edge consisting of the indices (or positions) of the edges containing that vertex. For example, the dual of {{1,2},{2,3}} is {{1},{1,2},{2}}. A weak antichain is a multiset of sets, none of which is a proper subset of any other.

Examples

			The a(0) = 1 through a(3) = 10 set-systems:
  {}  {}     {}      {}
      {{1}}  {{1}}   {{1}}
             {{2}}   {{2}}
             {{12}}  {{3}}
                     {{12}}
                     {{13}}
                     {{23}}
                     {{123}}
                     {{12}{13}{23}}
                     {{12}{13}{23}{123}}

Crossrefs

Intersecting set-systems are A051185.
The BII-numbers of these set-systems are the intersection of A326910 and A326966.
Set-systems whose dual is a weak antichain are A326968.
The covering version is A327058.
The unlabeled multiset partition version is A327060.
Cf. A000372, A305844, A326951, A326965, A326970, A327057, A327062.

Programs

  • Mathematica
    dual[eds_]:=Table[First/@Position[eds,x],{x,Union@@eds}];
stableSets[u_,Q_]:=If[Length[u]==0,{{}},With[{w=First[u]},Join[stableSets[DeleteCases[u,w],Q],Prepend[#,w]&/@stableSets[DeleteCases[u,r_/;r==w||Q[r,w]||Q[w,r]],Q]]]];
stableQ[u_,Q_]:=!Apply[Or,Outer[#1=!=#2&&Q[#1,#2]&,u,u,1],{0,1}];
Table[Length[Select[stableSets[Subsets[Range[n],{1,n}],Intersection[#1,#2]=={}&],stableQ[dual[#],SubsetQ]&]],{n,0,3}]

Formula

Binomial transform of A327058.
Previous Showing 11-13 of 13 results.

Started in 1964 by Neil J. A. Sloane | Maintained by The OEIS Foundation Inc.

Content is available under The OEIS End-User License Agreement.