搜索: a266412-编号:a266412
|
|
|
|
1, 2, 3, 4, 5, 7, 6, 8, 9, 11, 15, 10, 13, 14, 12, 16, 17, 19, 23, 31, 18, 21, 27, 22, 29, 30, 20, 25, 26, 28, 24, 32, 33, 35, 39, 47, 63, 34, 37, 43, 55, 38, 45, 59, 46, 61, 62, 36, 41, 51, 42, 53, 54, 44, 57, 58, 60, 40, 49, 50, 52, 56, 48, 64, 65, 67, 71, 79, 95, 127, 66, 69, 75, 87, 111, 70, 77, 91, 119, 78, 93, 123
(列表;图表;参考文献;听;历史;文本;内部格式)
|
|
|
抵消
|
1,2
|
|
链接
|
|
|
配方奶粉
|
作为其他排列的组合:
其他身份。对于所有n>=0:
|
|
黄体脂酮素
|
(方案,带有记忆宏定义)
|
|
交叉参考
|
|
|
关键词
|
|
|
作者
|
|
|
状态
|
经核准的
|
|
|
|
|
|
|
1, 2, 3, 4, 5, 7, 6, 8, 9, 12, 10, 15, 13, 14, 11, 16, 17, 21, 18, 27, 22, 24, 19, 31, 28, 29, 23, 30, 25, 26, 20, 32, 33, 38, 34, 48, 39, 42, 35, 58, 49, 51, 40, 54, 43, 45, 36, 63, 59, 60, 50, 61, 52, 53, 41, 62, 55, 56, 44, 57, 46, 47, 37, 64, 65, 71, 66, 86, 72, 76, 67, 106, 87, 90, 73, 96, 77, 80, 68, 121, 107, 109, 88
(列表;图表;参考文献;听;历史;文本;内部格式)
|
|
|
抵消
|
1,2
|
|
评论
|
|
...................1...................
2 3
4......../ \........5 7......../ \........6
/ \ / \ / \ / \
/ \ / \ / \ / \
/ \ / \ / \ / \
8 9 12 10 15 13 14 11
16 17 21 18 27 22 24 19 31 28 23 30 25 26 20
等。
|
|
链接
|
|
|
配方奶粉
|
作为其他排列的组合:
其他身份。对于所有n>=0:
|
|
黄体脂酮素
|
(方案,带有备忘录-宏定义)
|
|
交叉参考
|
|
|
关键词
|
|
|
作者
|
|
|
状态
|
经核准的
|
|
|
|
|
|
|
1, 2, 4, 3, 6, 8, 7, 5, 10, 12, 14, 13, 16, 15, 11, 9, 18, 20, 22, 24, 23, 26, 28, 27, 30, 29, 25, 32, 31, 21, 19, 17, 34, 36, 38, 40, 42, 41, 44, 46, 48, 47, 50, 52, 51, 54, 53, 49, 56, 58, 57, 60, 59, 55, 62, 61, 45, 43, 64, 63, 39, 37, 35, 33, 66, 68, 70, 72, 74, 76, 75, 78, 80, 82, 84, 83, 86, 88, 90, 89, 92, 94, 93, 96, 95, 91
(列表;图表;参考文献;听;历史;文本;内部格式)
|
|
|
抵消
|
1,2
|
|
链接
|
|
|
数学
|
f[n_]:=块[{a={1},g,b=范围[2,n]},g[1]=g[2]=1;g[x_]:=g[x]=g[g[x-1]]+g[x-g[x-2];Do[{AppendTo[a,#[[1,1]]],Set[b,Last@#]}&@If[#>Length@b,Break[],TakeDrop[b,{#}]]&@(2g[#]-#+1)&@k,{k,2,n}];a] ;f@97(*迈克尔·德弗利格,2015年12月29日,10.2版,基于哈维·P·戴尔在A004074号*)
|
|
黄体脂酮素
|
(方案,带有Antti Karttunen的IntSeq-library中的defineperm1-macro)
(定义1(A266411型n) (如果(<=n 1)n(let loop((i 1))(第n个(A004074号n) )(cond(非lte?)(A266412型i) n)(如果(零?第n个一)i(回路(+i 1)(-第n个1)))(否则(回路(+1)第n个))))
;; 在a为#f的情况下,我们也考虑a>b(即不小于b)。
;; (由于defineperm1-macro使用的有状态缓存系统):
(define(not-lte?a b)(cond((not(number?a))#t)(else(>a b)))
|
|
交叉参考
|
|
|
关键词
|
非n
|
|
作者
|
|
|
状态
|
经核准的
|
|
|
搜索在0.006秒内完成
|