登录
OEIS基金会由OEIS的用户捐款和西蒙斯基金会的资助。

 

标志

感谢所有在我们年度呼吁中捐款的人!
若要查看捐赠者名单或捐款,请参阅OEIS基金会主页

提示
问候整数序列的在线百科全书!)
A325105 { 1…n}的二进制进位连通子集数。
1, 2, 3、7, 8, 20、48, 112, 113、325, 777, 1737、3709, 7741, 15869、32253, 32254, 96538、225798, 485702, 1006338、2049602, 4137346, 8315266、16697102, 33465934, 67007886、134100366, 268301518, 536720590、1073575118, 2147316942, 2147316943、6441886323 列表图表参考文献历史文本内部格式
抵消

0、2

评论

两个正整数的二进制进位是两个正整数在反向二元展开中的位置的重叠。子集是二进制进位连通的,如果它的顶点是元素并且其边是二进制进位的图是连通的。

链接

Alois P. Heinzn,a(n)n=0…1023的表

公式

A(n)=A30697(n,0)+A30697(n,1)。-阿洛伊斯·P·海因茨3月31日2019

例子

A(0)=1到A(4)=8子集:

{}{}{{}{}{}

{ 1 } { 1 } { 1 }{{}}

{ 2 } { 2 }{ 2 }

{ 3 } { 3 }

{1,3}{ 4 }

{2,3}{1,3}

{1,2,3}{2,2,}

{1,2,3}

枫树

H:= PROC(n,s)局部i,m;m:=n;

因为i在s dom:=位[或](m,i)oD;{m}

结束:

g=:(n,s)->(w={i}(w={}),s结合{n},s减去W.

H(n,w))(选择(x-位[and ](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-> B(n,{}):

SEQ(A(n),n=0…35);阿洛伊斯·P·海因茨3月31日2019

Mathematica

BiPoS[n]:=连接@位置[反向[整数数字(n,2)],1 ];

CS[s]:[{c=选择[元组[长度[s] ],2 ],和[OrrdEdq[y],unSAMEq@ @ y],长度[交叉点@ @ [[α] ] ] 0 ]和[}],如果[C=={},S,CSM[排序]追加[删除],列表/@ C[[〔1〕] ],联合@ @ [[C]〔1〕

表[长度] [子集[范围[n] ],长度[cSM[bPoS/@α] ] < 1=],{n,0, 10 }

交叉裁判

囊性纤维变性。A019565A080575A247935A3047A30716A305078.

囊性纤维变性。A325095A325098A325099A325104A325107A325118A325119.

部分和A30629.

语境中的顺序:A247843 A181658 A251541*A76032 A11481 A137823

相邻序列:A325102 A325103 A325104*A325106 A325107 A325108

关键词

诺恩

作者

格斯威斯曼3月28日2019

扩展

A(16)-A(33)从阿洛伊斯·P·海因茨3月31日2019

地位

经核准的

查找γ欢迎γ维基γ注册γ音乐γ情节2γ演示γ指数γ浏览γ更多γ网络摄像机
贡献新的SEQ。或评论γ格式γ样式表γ变换γ超级导引头γ最近
OEIS社区通过保持OEIS基金会

许可协议、使用条款、隐私政策。.

最后修改1月21日20:39 EST 2020。包含331128个序列。(在OEIS4上运行)