登录
OEIS由OEIS基金会的许多慷慨捐赠者.

 

标志
提示
(来自的问候整数序列在线百科全书!)
A247456号 对k进行编号,使d(r,k)=0,d(s,k)=1,其中d(x,k)=x的第k位二进制数字,r={sqrt(2)},s={3*sqrt。 4
4, 6, 12, 14, 20, 24, 28, 37, 47, 52, 55, 60, 63, 69, 83, 85, 92, 100, 102, 104, 106, 119, 121, 129, 150, 157, 159, 163, 166, 168, 177, 179, 184, 186, 190, 198, 201, 215, 219, 228, 232, 236, 241, 246, 250, 252, 254, 256, 258, 271, 276, 284, 288, 303, 305 (列表图表参考历史文本内部格式)
偏移
1,1
评论
每个正整数正好位于以下其中之一:A247455型,A247456号,A247457型,A247458型.
链接
克拉克·金伯利,n=1..500时的n,a(n)表
例子
{1*sqrt(2)}具有二进制数字0,1,1,0,1,。。。
{3*sqrt(2)}具有二进制数字0,0,1,1,。。。
因此a(1)=4,a(2)=6。
数学
z=400;r=分数部分[Sqrt[2]];s=分数部分[3*Sqrt[2];
u=扁平[{ConstantArray[0,-#[2]]],#[[1]]}]&[RealDigits[r,2,z]]
v=扁平[{ConstantArray[0,-#[2]]],#[[1]]}]&[RealDigits[s,2,z]]
t1=表格[如果[u[[n]]==0&&v[[n]==0,1,0],{n,1,z}];
t2=表[如果[u[[n]]==0&&v[[n]]==1,1,0],{n,1,z}];
t3=表格[如果[u[[n]]==1&v[[n]==0,1,0],{n,1,z}];
t4=表格[如果[u[[n]]==1&v[[n]==1,1,0],{n,1,z}];
压扁[位置[t1,1]](*1974年2月55日*)
压扁[位置[t2,1]](*A247456号*)
压扁[位置[t3,1]](*A247457型*)
压扁[位置[t4,1]](*A247458型*)
交叉参考
囊性纤维变性。A247455型,A247457型,A247458型.
关键词
非n,容易的,基础
作者
克拉克·金伯利2014年9月18日
状态
经核准的

查找|欢迎光临|维基|注册|音乐|地块2|演示|索引|浏览|更多|网络摄像头
贡献新序列。或评论|格式|样式表|变换|超级搜索|最近
OEIS社区|维护人OEIS基金会。

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

上次修改时间:2024年4月18日22:18 EDT。包含371782个序列。(在oeis4上运行。)