登录
OEIS基金会得到了OEIS用户的捐赠和西蒙斯基金会的资助。

 

标志


提示
(问候来自整数序列在线百科全书!)
A1945年 [1,n]中的k个数,其中<n*r>+<k*r>>1,其中<>=小数部分,r=sqrt(2);行和邮编:A164664. 4
2、2、2、2、2、2、2、6、2、7、1、6、12、5、12、12、12、12、12、12、4、11、1、8、17、17、6、15、2、12、23、9、21、5、17、0、12、26、8、22、2、16、32、11、28、5、22、40、16、35、10、29、2、21、42、42、14、36、6、28、51、20、44、28、51、20、44、11、44、11、11、25、25、51、16、42、5、32、32、60、22、51、11、40、70、29、29、60、18、49、5、5、35、25、42、42、5、42、20、20、20 36个 (列表;图表;参考文献;;历史;文本;内部格式)
抵消

1,2

链接

G、 C.格雷贝尔,n=1..10000的n,a(n)表

数学

r=Sqrt[2];z=13;

p[x_x]:=分馏部分[x];f[x十一]:=楼层[x];

w[n,k\u]:=p[r^n]+p[r^k]-p[r^n+r^k]

展平[表格[w[n,k],{n,1,z},{k,1,n}]]

TableForm[表格[w[n,k],{n,1,z},{k,1,n}]]

s[n_x]:=和[w[n,k],{k,1,n}](*A194663号*)

表[s[n],{n,1100}]

h[n_x,k_u]:=f[p[n*r]+p[k*r]]

展平[表格[h[n,k],{n,1,z},{k,1,n}]]

   (*邮编:A194664*)

表格形式[表格[h[n,k],{n,1,z},{k,1,n}]]

t[n_x]:=和[h[n,k],{k,1,n}]

表[t[n],{n,1100}](*A1945年*)

交叉引用

囊性纤维变性。邮编:A194664.

上下文顺序:A025643号 邮编:A127478 A127472号*A004563号 A329647飞机 A146094号

相邻序列:A194662号 A194663号 邮编:A194664*A194666号 A194667号 邮编:A194668

关键字

作者

克拉克·金伯利2011年9月1日

状态

经核准的

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

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

上次修改日期:美国东部时间2020年8月14日23:02。包含336483个序列。(运行在oeis4上。)