A194046-OEIS公司

A194046号

天然散布A052905号反对偶的矩形阵列。

1, 5, 2, 10, 6, 3, 16, 11, 7, 4, 23, 17, 12, 8, 9, 31, 24, 18, 13, 14, 15, 40, 32, 25, 19, 20, 21, 22, 50, 41, 33, 26, 27, 28, 29, 30, 61, 51, 42, 34, 35, 36, 37, 38, 39, 73, 62, 52, 43, 44, 45, 46, 47, 48, 49, 86, 74, 63, 53, 54, 55, 56, 57, 58, 59, 60, 100, 87, 75

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

抵消

1,2

请参阅A194029号用于定义自然分形序列和自然散布。每个正整数只出现一次（每对行交错出现），因此作为一个序列，A194046号是正整数的置换；它的反比是A194047号.

链接

n，a（n）表，n=1..69。

例子

西北角：

1...5...10...16...23

2...6...11...17...24

3...7...12...18...25

4...8...13...19...26

9...14..20...27...35

数学

z=30；

c[k_]：=（k^2+5k-4）/2；

c=表格[c[k]，{k，1，z}](*A052905号*)

f[n_]：=如果[MemberQ[c，n]，1，1+f[n-1]]

f=表[f[n]，{n，1，255}]（*分形序列[A002260号] *)

r[n_]：=压扁[位置[f，n]]

t[n_，k_]：=r[n][[k]]

表格形式[表格[t[n，k]，{n，1，7}，{k，1，7}]]

p=扁平[表[t[k，n-k+1]，{n，1，13}，{k，1，n}]](*A194046号*)

q[n_]：=位置[p，n]；压扁[表[q[n]，{n，1，70}]](*A194047号*)

交叉参考

囊性纤维变性。A194029号,A194047号

上下文中的序列：A178714号 A036121号 A162396号*A249368号 A055682号 A187875号

相邻序列：A194043号 A194044号 A194045号*A194047号 A194048号 A194049号

关键词

非n,表

作者

克拉克·金伯利2011年8月13日

状态

经核准的