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

 

标志
提示
(来自的问候整数序列在线百科全书!)
A194685号 三角形数组:T(n,k)=[<n*r>+<k*r>],其中[]=地板,<>=分数部分,r=(1+sqrt(3))/2。 4
0, 1, 1, 0, 0, 0, 0, 1, 0, 0, 1, 1, 0, 1, 1, 0, 0, 0, 0, 1, 0, 0, 1, 0, 1, 1, 0, 1, 1, 1, 1, 1, 1, 1, 1, 1, 0, 1, 0, 0, 1, 0, 0, 1, 0, 1, 1, 0, 1, 1, 0, 1, 1, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 1, 0, 0, 1, 0, 1, 0, 0, 1, 1, 0, 1, 1, 0, 1, 1, 1, 1, 0, 1, 1, 0, 0, 0, 0, 0, 0, 0, 1 (列表桌子图表参考历史文本内部格式)
抵消
1
评论
第n行和给出了[0,1]中的k的个数,其中<n*r>+<k*r>>1;看见A194686号.
链接
例子
前十二行:
0
1 1
0 0 0
0 1 0 0
1 1 0 1 1
0 0 0 0 1 0
0 1 0 1 1 0 1
1 1 1 1 1 1 1 1
0 1 0 0 1 0 0 1 0
1 1 0 1 1 0 1 1 0 1
0 0 0 0 0 0 0 0 0 0 0
0 1 0 0 1 0 0 1 0 1 0 0
数学
r=1/2+平方[3]/2;z=15;
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}]]
表格形式[Table[w[n,k],{n,1,z},{k,1,n}]]
s[n]:=总和[w[n,k],{k,1,n}]
表[s[n],{n,1100}](*A194684号*)
h[n,k_]:=f[p[n*r]+p[k*r]]
扁平[表[h[n,k],{n,1,z},{k,1,n}]]
表格形式[表格[h[n,k],{n,1,z},{k,1,n}]]
t[n]:=总和[h[n,k],{k,1,n}]
表[t[n],{n,1,100}](*A194686号*)
交叉参考
囊性纤维变性。A194686号.
关键词
非n,
作者
克拉克·金伯利2011年9月1日
状态
经核准的

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

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

上次修改时间:美国东部夏令时2024年4月19日21:09。包含371798个序列。(在oeis4上运行。)