A247455-OEIS公司

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

A247455型

对k进行编号，使d（r，k）=0，d（s，k）=0，其中d（x，k）＝x的第k位二进制数字，r={sqrt（2）}，s={3*sqrt。

6

1, 8, 9, 10, 11, 15, 21, 25, 29, 38, 42, 48, 51, 54, 57, 58, 59, 62, 64, 66, 70, 72, 78, 81, 82, 86, 89, 93, 96, 107, 109, 111, 113, 122, 128, 130, 134, 136, 139, 144, 147, 148, 149, 151, 153, 161, 162, 165, 169, 173, 181, 182, 183, 187, 191, 195, 200, 202

(列表;图表;参考文献;听;历史;文本;内部格式)

抵消

1,2

评论

每个正整数正好位于以下其中之一：A247455型,A247456号,A247457型,A247758号。让我们表示其中任何一个；关于lim（s<n）/n可以说什么，其中（s<n）代表s中<n的数字的数量？

链接

克拉克·金伯利，n=1..1000时的n，a（n）表

例子

{1*sqrt（2）}具有二进制数字0，1，1，0，1，。。。

{3*sqrt（2）}具有二进制数字0，0，1，1，。。。

因此a（1）=2，a（2）=8。

数学

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=表[If[u[[n]]==1&&v[[n]]==1，1，0]，{n，1，z}]；

压扁[位置[t1，1]](*A247455型*)

压扁[位置[t2，1]](*A247456号*)

压扁[位置[t3，1]](*A247457型*)

压扁[位置[t4，1]](*A247458型*)

交叉参考

囊性纤维变性。A246356型,1974年2月56日,1974年2月57日,A247458型.

上下文中的序列：A297260型 A296701型 A297134号*A280290型 A138581号 A323062型

相邻序列：A247452型 A247453型 A247454型*A247456号 A247457型 A247458型

关键词

非n,容易的,基础

作者

克拉克·金伯利2014年9月18日

状态

经核准的