A326913 BII-numbers of set-systems (without {}) closed under union and intersection.

0, 1, 2, 4, 5, 6, 8, 16, 17, 24, 32, 34, 40, 64, 65, 66, 68, 69, 70, 72, 80, 81, 85, 88, 96, 98, 102, 104, 120, 128, 256, 257, 384, 512, 514, 640, 1024, 1025, 1026, 1028, 1029, 1030, 1152, 1280, 1281, 1285, 1408, 1536, 1538, 1542, 1664, 1920, 2048, 2056, 2176

Offset

1,3

Comments

A set-system is a finite set of finite nonempty sets, so no two edges of a set-system that is closed under intersection can be disjoint.

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. We define the set-system with BII-number n to be obtained by taking the binary indices of each binary index of n. Every finite set of finite nonempty sets has a different BII-number. For example, 18 has reversed binary expansion (0,1,0,0,1), and since the binary indices of 2 and 5 are {2} and {1,3} respectively, the BII-number of {{2},{1,3}} is 18. Elements of a set-system are sometimes called edges.

Links

Table of n, a(n) for n=1..55.

Example

The sequence of all set-systems closed under union and intersection together with their BII-numbers begins:
   0: {}
   1: {{1}}
   2: {{2}}
   4: {{1,2}}
   5: {{1},{1,2}}
   6: {{2},{1,2}}
   8: {{3}}
  16: {{1,3}}
  17: {{1},{1,3}}
  24: {{3},{1,3}}
  32: {{2,3}}
  34: {{2},{2,3}}
  40: {{3},{2,3}}
  64: {{1,2,3}}
  65: {{1},{1,2,3}}
  66: {{2},{1,2,3}}
  68: {{1,2},{1,2,3}}
  69: {{1},{1,2},{1,2,3}}
  70: {{2},{1,2},{1,2,3}}
  72: {{3},{1,2,3}}

Mathematica

bpe[n_]:=Join@@Position[Reverse[IntegerDigits[n, 2]], 1];
Select[Range[0, 100], SubsetQ[bpe/@bpe[#], Union@@@Tuples[bpe/@bpe[#], 2]]&&SubsetQ[bpe/@bpe[#], Intersection@@@Tuples[bpe/@bpe[#], 2]]&]

Crossrefs

Cf. A048793, A102894, A102895, A102896, A102897, A326031, A326875, A326876, A326878, A326880, A326901.

Sequence in context: A326910 A326905 A327061 * A326703 A244008 A104704

Adjacent sequences: A326910 A326911 A326912 * A326914 A326915 A326916

Keyword

nonn

Author

Gus Wiseman, Aug 04 2019

Status

approved