%I#9 2024年3月28日11:58:10

%S 1,2,4,8,10,16,32,34,36,38,40,42,44,46,64128130136138160162164，

%电话：166168170172174256260288290292294296298300302416418，

%电话：420422442642843051254022528530536538546548

%二元指数是连通的N个数，其中两个数是连通的，只要它们有一个公因数。

%n的二进制索引是1在其逆二进制展开中的任何位置。n的二进制索引是A048793的第n行。

%C空集不被视为已连接。

%e这些术语及其二进制展开式和二进制索引开始于：

%e1:1~{1}

%e2:10~{2}

%e4:100~{3}

%e8:1000~{4}

%e 10:1010~{2,4}

%e 16:10000~{5}

%e32:100000~{6}

%电子34:100010~{2,6}

%e 36:100100至{3,6}

%电子38:100110~{2,3,6}

%e40:101000~{4,6}

%电子42:1010~{2,4,6}

%e 44:101100~{3,4,6}

%e 46:10101110～{2,3,4,6}

%e 64:1000000~{7}

%e 128:10000000~{8}

%e 130:10000010~{2,8}

%电子136:10001000~{4,8}

%电子138:10001010~{2,4,8}

%e 160:1010000~{6,8}

%e 162:10100010~{2,6,8}

%电子164:1010100~{3,6,8}

%t csm[s_]：=使用[{c=Select[Subsets[Range[Length[s]]，{2}]，Length[Intersection@@s[[#]]>0&]}，如果[c=={}，s，csm[Sort[Append[Delete[s，List/@c[[1]]]，Union@@s[[c[1]]]]]；

%t prix[n_]：=如果[n==1，{}，扁平[Cases[FactorInteger[n]，{p_，k_}:>表[PrimePi[p]，{k}]]]；

%t bpe[n_]：=连接@@Position[Reverse[IntegerDigits[n，2]]，1]；

%t选择[Range[01000]，Length[csm[prix/@bpe[#]]==1&]

%Y对于每个质数指数的质数指数，我们有A305078。

%Y相反的版本是A325118。

%Y对于每个二进制索引的二进制索引，我们有A326749。

%Y两两不可分割的案例是A371294，与A371445相对。

%A371452中的Y位置。

%Y A001187统计连接图。

%Y A007718统计非同构连接的多集分区。

%Y A048143统计集合的连接反链。

%Y A048793列出二进制索引，A000120长度，A272020反向，A029931总和。

%Y A070939给出二进制扩展的长度。

%Y A087086列出了二进制索引成对不可分割的数字。

%Y A096111给出了二进制指数的乘积。

%Y A326964统计连接的机组系统，涵盖A323818。

%Y参考A000040、A000720、A001222、A305079、A326753、A371446。

%K nonn，基础

%O 1,2号机组

%A _古斯·维塞曼_，2024年3月27日