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.
%I A327144 #6 Sep 01 2019 08:41:53 %S A327144 0,1,1,0,1,1,1,1,1,0,0,0,0,0,0,0,1,1,0,0,1,1,1,1,1,1,0,0,1,1,1,1,1,0, %T A327144 1,0,1,1,1,1,1,0,1,0,1,1,1,1,1,1,1,1,2,2,2,2,1,1,1,1,2,2,2,2,1,1,1,1, %U A327144 1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,2,2,2 %N A327144 Spanning edge-connectivity of the set-system with BII-number n. %C A327144 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 (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. %C A327144 The spanning edge-connectivity of a set-system is the minimum number of edges that must be removed (without removing incident vertices) to obtain a set-system that is disconnected or covers fewer vertices. %e A327144 Positions of first appearances of each integer together with the corresponding set-systems: %e A327144 0: {} %e A327144 1: {{1}} %e A327144 52: {{1,2},{1,3},{2,3}} %e A327144 116: {{1,2},{1,3},{2,3},{1,2,3}} %e A327144 3952: {{1,3},{2,3},{1,4},{2,4},{3,4},{1,2,3},{1,2,4}} %e A327144 8052: {{1,2},{1,3},{2,3},{1,4},{2,4},{3,4},{1,2,3},{1,2,4},{1,3,4}} %t A327144 bpe[n_]:=Join@@Position[Reverse[IntegerDigits[n,2]],1]; %t A327144 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 A327144 spanEdgeConn[vts_,eds_]:=Length[eds]-Max@@Length/@Select[Subsets[eds],Union@@#!=vts||Length[csm[#]]!=1&]; %t A327144 Table[spanEdgeConn[Union@@bpe/@bpe[n],bpe/@bpe[n]],{n,0,100}] %Y A327144 Dominated by A327103. %Y A327144 The same for cut-connectivity is A326786. %Y A327144 The same for non-spanning edge-connectivity is A326787. %Y A327144 The same for vertex-connectivity is A327051. %Y A327144 Positions of 1's are A327111. %Y A327144 Positions of 2's are A327108. %Y A327144 Positions of first appearance of each integer are A327147. %Y A327144 Cf. A000120, A048793, A070939, A322338, A323818, A326031, A327041, A327069, A327076, A327130, A327145. %K A327144 nonn %O A327144 0,53 %A A327144 _Gus Wiseman_, Aug 31 2019