cp's OEIS Frontend

A330231 Number of distinct set-systems that can be obtained by permuting the vertices of the set-system with BII-number n.

%I A330231 #5 Dec 10 2019 20:01:15
%S A330231 1,1,1,1,1,2,2,1,1,1,1,1,3,6,6,3,1,2,3,6,3,3,6,6,2,1,6,3,6,6,3,3,1,3,
%T A330231 2,6,3,6,3,6,2,6,1,3,6,3,6,3,3,6,6,3,1,3,3,3,3,6,6,3,3,3,3,1,1,3,3,3,
%U A330231 3,6,6,3,3,3,3,1,3,6,6,3,3,6,3,6,3,3,6
%N A330231 Number of distinct set-systems that can be obtained by permuting the vertices of the set-system with BII-number n.
%C A330231 A set-system is a finite set of finite nonempty sets.
%C A330231 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 set-system 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.
%F A330231 a(n) is a divisor of A326702(n)!.
%e A330231 30 is the MM-number of {{2},{3},{1,2},{1,3}}, with vertex permutations
%e A330231   {{1},{2},{1,3},{2,3}}
%e A330231   {{1},{3},{1,2},{2,3}}
%e A330231   {{2},{3},{1,2},{1,3}}
%e A330231 so a(30) = 3.
%t A330231 bpe[n_]:=Join@@Position[Reverse[IntegerDigits[n,2]],1];
%t A330231 graprms[m_]:=Union[Table[Sort[Sort/@(m/.Rule@@@Table[{p[[i]],i},{i,Length[p]}])],{p,Permutations[Union@@m]}]];
%t A330231 Table[Length[graprms[bpe/@bpe[n]]],{n,0,100}]
%Y A330231 Positions of 1's are A330217.
%Y A330231 Positions of first appearances are A330218.
%Y A330231 The version for MM-numbers is A330098.
%Y A330231 Achiral set-systems are counted by A083323.
%Y A330231 BII-numbers of fully chiral set-systems are A330226.
%Y A330231 Cf. A000120, A003238, A007716, A016031, A048793, A055621, A070939, A214577, A326031, A326702, A330101, A330195, A330229, A330230, A330233.
%K A330231 nonn
%O A330231 0,6
%A A330231 _Gus Wiseman_, Dec 09 2019