A326877 Number of connectedness systems covering n vertices without singletons.
1, 0, 1, 8, 381, 252080, 18687541309
Offset: 0
Examples
The a(3) = 8 covering connectedness systems without singletons: {{1,2,3}} {{1,2},{1,2,3}} {{1,3},{1,2,3}} {{2,3},{1,2,3}} {{1,2},{1,3},{1,2,3}} {{1,2},{2,3},{1,2,3}} {{1,3},{2,3},{1,2,3}} {{1,2},{1,3},{2,3},{1,2,3}}
Links
- Gus Wiseman, Every Clutter Is a Tree of Blobs, The Mathematica Journal, Vol. 19, 2017.
Crossrefs
Programs
-
Mathematica
Table[Length[Select[Subsets[Subsets[Range[n],{2,n}]],Union@@#==Range[n]&&SubsetQ[#,Union@@@Select[Tuples[#,2],Intersection@@#!={}&]]&]],{n,0,4}]
Extensions
a(6) corrected by Christian Sievers, Oct 28 2023
Comments