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

 

标志
提示
(来自的问候整数序列在线百科全书!)
A194663号 [1,n]中k的个数,其中<r^n>+<r^k>>1,其中<>=小数部分,r=sqrt(2)。 4
0, 0, 2, 0, 3, 0, 1, 0, 4, 0, 1, 0, 4, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 6, 0, 1, 0, 4, 0, 14, 0, 14, 0, 14, 0, 11, 0, 4, 0, 8, 0, 18, 0, 14, 0, 5, 0, 10, 0, 22, 0, 17, 0, 6, 0, 13, 0, 30, 0, 31, 0, 31, 0, 31, 0, 31, 0, 31, 0, 25, 0, 12, 0, 19, 0, 37, 0, 37, 0, 31, 0, 22, 0, 41, 0, 41 (列表;图表;参考;;历史;文本;内部格式)
抵消
1,3
链接
数学
r=平方[2];z=13;
p[x_]:=分数部分[x];f[x_]:=楼层[x];
w[n,k_]:=p[r^n]+p[r*k]-p[r*n+r*k]
扁平[表[w[n,k],{n,1,z},{k,1,n}]]
表格形式[表格[w[n,k],{n,1,z},{k,1,n}]]
s[n]:=总和[w[n,k],{k,1,n}](*A194663号*)
表[s[n],{n,1,100}]
h[n,k_]:=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]:=总和[h[n,k],{k,1,n}]
表[t[n],{n,1,100}](*A194665号*)
交叉参考
关键字
非n
作者
克拉克·金伯利2011年9月1日
状态
经核准的

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

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

上次修改时间:2024年4月23日14:32 EDT。包含371914个序列。(在oeis4上运行。)