0,4个

如果两个整数按位且不为零，则它们是二进制进位连接的。

当n=0时，进位连通子集为空集。

阿洛伊斯·P·海因茨，n=0..1024的n，a（n）表

维基百科，按位运算

维基百科，集合的划分

a（n）=A325105（n）-A325105（n-1）对于n>0，a（0）=1。

a（n）=1<=>n英寸{A131577号}.

a（n）mod 4=0<=>不（n英寸{A131577号}).

h： =proc（n，s）局部i，m；m： =n；

对于i in s do m：=位[或]（m，i）od；{m}

结束：

g： =（n，s）->（w->`如果`（w={}，s并集{n}，s减去w并集

h（n，w））（选择（x->位[和]（n，x）>0，s））：

b： =proc（n，s）选项记忆`如果`（n=0，

`如果`（nops（s）>1，0，1），b（n-1，s）+b（n-1，g（n，s）））

结束：

a： =n->`如果`（n=0，1，b（n-1，{n}））：

顺序（a（n），n=0..42）；

h[n_u，s}：模[{i，m=n}，Do[m=BitOr[m，i]，{i，s}]；{m} ]；

g[n，s}：=函数[w，If[w=={}，s~并集{n}，s~补码~w~联合~h[n，w]]][Select[s，BitAnd[n，#]>0&]]；

b[n_u，s_u]：=b[n，s]=如果[n==0，如果[长度[s]>1，0，1]，b[n-1，s]+b[n-1，g[n，s]]]；

a[n_x]：=如果[n==0，1，b[n-1，{n}]]；

a/@范围[0，42](*让·弗朗索瓦·阿尔科弗，2020年5月10日，Maple之后*）

部分差异A325105.

囊性纤维变性。A131577号.

上下文顺序：A274087号 A105197号 A157398号*A089503号 A019236年 A019237年

相邻序列：A306296型 A306297飞机 A306298型*A306300型 A306301 A306302型

不

海因茨2019年3月31日

经核准的