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

 

标志
提示
(来自的问候整数序列在线百科全书!)
A194866号 矩形阵列,通过反对偶:第n行给出了n在分形序列中的位置A194865号穿插。 4
1, 2, 3, 4, 5, 6, 8, 9, 10, 7, 12, 14, 15, 11, 13, 17, 19, 21, 16, 18, 20, 23, 25, 27, 22, 24, 26, 28, 31, 33, 35, 29, 32, 34, 36, 30, 39, 42, 44, 37, 40, 43, 45, 38, 41, 48, 51, 54, 46, 49, 52, 55, 47, 50, 53, 59, 62, 65, 57, 60, 63, 66, 58, 61, 64, 56, 70, 74, 77 (列表;桌子;图表;参考;;历史;文本;内部格式)
抵消
1,2
链接
例子
西北角:
1...2...4...8...12..17..23
3...5...9...14..19..25..33
6...10..15..21..27..35..44
7...11..16..22..29..37..46
13..18..24..32..40..49..60
数学
r=-E;
t[n_]:=表[分数部分[k*r],{k,1,n}];
f=压扁[表[压扁[(位置[t[n],#1]&)/@
排序[t[n],Less]],{n,1,20}]](*A194865号*)
表格形式[Table[Flatten](位置[t[n],#1]&)/@
排序[t[n],Less]],{n,1,15}]]
行[n_]:=位置[f,n];
u=表格形式[表格[行[n],{n,1,20}]]
g[n_,k_]:=部件[行[n],k];
p=扁平[表[g[k,n-k+1],{n,1,13},
{k,1,n}]](*A194866号*)
q[n_]:=位置[p,n];压扁[表[q[n],
{n,1,80}]](*A194864号*)
交叉参考
囊性纤维变性。A194832号,A194864号,A194865号.
关键词
非n,
作者
克拉克·金伯利2011年9月4日
状态
经核准的

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

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

上次修改时间:美国东部夏令时2024年3月28日04:05。包含371235个序列。(在oeis4上运行。)