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.

A326948 Number of connected T_0 set-systems on n vertices.

This page as a plain text file.
%I A326948 #13 Jan 29 2024 13:48:25
%S A326948 1,1,3,86,31302,2146841520,9223371978880250448,
%T A326948 170141183460469231408869283342774399392,
%U A326948 57896044618658097711785492504343953919148780260559635830120038252613826101856
%N A326948 Number of connected T_0 set-systems on n vertices.
%C A326948 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}}. The T_0 condition means that the dual is strict (no repeated edges).
%H A326948 Andrew Howroyd, <a href="/A326948/b326948.txt">Table of n, a(n) for n = 0..11</a>
%F A326948 Logarithmic transform of A059201.
%e A326948 The a(3) = 86 set-systems:
%e A326948   {12}{13}         {1}{2}{13}{123}     {1}{2}{3}{13}{23}
%e A326948   {12}{23}         {1}{2}{23}{123}     {1}{2}{3}{13}{123}
%e A326948   {13}{23}         {1}{3}{12}{13}      {1}{2}{3}{23}{123}
%e A326948   {1}{2}{123}      {1}{3}{12}{23}      {1}{2}{12}{13}{23}
%e A326948   {1}{3}{123}      {1}{3}{12}{123}     {1}{2}{12}{13}{123}
%e A326948   {1}{12}{13}      {1}{3}{13}{23}      {1}{2}{12}{23}{123}
%e A326948   {1}{12}{23}      {1}{3}{13}{123}     {1}{2}{13}{23}{123}
%e A326948   {1}{12}{123}     {1}{3}{23}{123}     {1}{3}{12}{13}{23}
%e A326948   {1}{13}{23}      {1}{12}{13}{23}     {1}{3}{12}{13}{123}
%e A326948   {1}{13}{123}     {1}{12}{13}{123}    {1}{3}{12}{23}{123}
%e A326948   {2}{3}{123}      {1}{12}{23}{123}    {1}{3}{13}{23}{123}
%e A326948   {2}{12}{13}      {1}{13}{23}{123}    {1}{12}{13}{23}{123}
%e A326948   {2}{12}{23}      {2}{3}{12}{13}      {2}{3}{12}{13}{23}
%e A326948   {2}{12}{123}     {2}{3}{12}{23}      {2}{3}{12}{13}{123}
%e A326948   {2}{13}{23}      {2}{3}{12}{123}     {2}{3}{12}{23}{123}
%e A326948   {2}{23}{123}     {2}{3}{13}{23}      {2}{3}{13}{23}{123}
%e A326948   {3}{12}{13}      {2}{3}{13}{123}     {2}{12}{13}{23}{123}
%e A326948   {3}{12}{23}      {2}{3}{23}{123}     {3}{12}{13}{23}{123}
%e A326948   {3}{13}{23}      {2}{12}{13}{23}     {1}{2}{3}{12}{13}{23}
%e A326948   {3}{13}{123}     {2}{12}{13}{123}    {1}{2}{3}{12}{13}{123}
%e A326948   {3}{23}{123}     {2}{12}{23}{123}    {1}{2}{3}{12}{23}{123}
%e A326948   {12}{13}{23}     {2}{13}{23}{123}    {1}{2}{3}{13}{23}{123}
%e A326948   {12}{13}{123}    {3}{12}{13}{23}     {1}{2}{12}{13}{23}{123}
%e A326948   {12}{23}{123}    {3}{12}{13}{123}    {1}{3}{12}{13}{23}{123}
%e A326948   {13}{23}{123}    {3}{12}{23}{123}    {2}{3}{12}{13}{23}{123}
%e A326948   {1}{2}{3}{123}   {3}{13}{23}{123}    {1}{2}{3}{12}{13}{23}{123}
%e A326948   {1}{2}{12}{13}   {12}{13}{23}{123}
%e A326948   {1}{2}{12}{23}   {1}{2}{3}{12}{13}
%e A326948   {1}{2}{12}{123}  {1}{2}{3}{12}{23}
%e A326948   {1}{2}{13}{23}   {1}{2}{3}{12}{123}
%t A326948 dual[eds_]:=Table[First/@Position[eds,x],{x,Union@@eds}];
%t A326948 csm[s_]:=With[{c=Select[Tuples[Range[Length[s]],2],And[OrderedQ[#],UnsameQ@@#,Length[Intersection@@s[[#]]]>0]&]},If[c=={},s,csm[Sort[Append[Delete[s,List/@c[[1]]],Union@@s[[c[[1]]]]]]]]];
%t A326948 Table[Length[Select[Subsets[Subsets[Range[n],{1,n}]],Union@@#==Range[n]&&Length[csm[#]]<=1&&UnsameQ@@dual[#]&]],{n,0,3}]
%Y A326948 The same with covering instead of connected is A059201, with unlabeled version A319637.
%Y A326948 The non-T_0 version is A323818 (covering) or A326951 (not-covering).
%Y A326948 The non-connected version is A326940, with unlabeled version A326946.
%Y A326948 Cf. A000371, A003465, A245567, A316978, A319559, A319564, A326939, A326941, A326947.
%K A326948 nonn
%O A326948 0,3
%A A326948 _Gus Wiseman_, Aug 08 2019