login
Number of ACI algebras or semilattices on n generators with no identity element.
22

%I #42 Aug 03 2019 07:27:43

%S 1,2,8,90,4542,2747402,151930948472,28175295407840207894

%N Number of ACI algebras or semilattices on n generators with no identity element.

%C An ACI algebra or semilattice is a system with a single binary, idempotent, commutative and associative operation.

%C Or, number of families of subsets of {1, ..., n} that are closed under intersection and contain the empty set.

%D G. Birkhoff, Lattice Theory. American Mathematical Society, Colloquium Publications, Vol. 25, 3rd ed., Providence, RI, 1967.

%D Maria Paola Bonacina and Nachum Dershowitz, Canonical Inference for Implicational Systems, in Automated Reasoning, Lecture Notes in Computer Science, Volume 5195/2008, Springer-Verlag.

%D P. Colomb, A. Irlande and O. Raynaud, Counting of Moore Families for n=7, International Conference on Formal Concept Analysis (2010)

%D E. H. Moore, Introduction to a Form of General Analysis, AMS Colloquium Publication 2 (1910), pp. 53-80.

%H N. Dershowitz, G. S. Huang and M. Harris, <a href="http://arxiv.org/abs/cs/0610054">Enumeration Problems Related to Ground Horn Theories</a>, arXiv:cs/0610054v2 [cs.LO], 2006-2008.

%H M. Habib and L. Nourine, <a href="https://doi.org/10.1016/j.disc.2004.11.010">The number of Moore families on n = 6</a>, Discrete Math., 294 (2005), 291-296.

%F For asymptotics see A102897.

%F a(n > 0) = 2 * A102894(n).

%e a(2) = 8: Let the points be labeled a, b and let 0 denote the empty set. We want the number of collections of subsets of {a, b} which are closed under intersection and contain the empty subset. 0 subsets: 0 ways, 1 subset: 1 way (0), 2 subsets: 3 ways (0,a; 0,b; 0,ab), 3 subsets: 3 ways (0,a,b; 0,a,ab; 0,b,ab), 4 subsets: 1 way (0,a,b,ab), for a total of 8.

%e From _Gus Wiseman_, Aug 02 2019: (Start)

%e The a(0) = 1 through a(2) = 8 sets of sets with {} that are closed under intersection are:

%e {{}} {{}} {{}}

%e {{},{1}} {{},{1}}

%e {{},{2}}

%e {{},{1,2}}

%e {{},{1},{2}}

%e {{},{1},{1,2}}

%e {{},{2},{1,2}}

%e {{},{1},{2},{1,2}}

%e (End)

%t Table[Length[Select[Subsets[Subsets[Range[n]]],MemberQ[#,{}]&&SubsetQ[#,Intersection@@@Tuples[#,2]]&]],{n,0,3}] (* _Gus Wiseman_, Aug 02 2019 *)

%Y The connected case (i.e., with maximum) is A102894.

%Y The same for union instead of intersection is A102896.

%Y The unlabeled version is A108800.

%Y The case also closed under union is A326878.

%Y The BII-numbers of these set-systems (without the empty set) are A326880.

%Y The covering case is A326881.

%Y Cf. A000798, A102897, A108798, A193674, A193675, A306445, A326883.

%K nonn,hard,more

%O 0,2

%A _Mitch Harris_, Jan 18 2005

%E Additional comments from _Don Knuth_, Jul 01 2005

%E Changed a(0) from 2 to 1 by _Gus Wiseman_, Aug 02 2019