|
| |
|
| A187817号 |
| {1，…，n}的置换p的数目，使得对于从3到n-1的所有i，{p（1），…，p（i-1）}的恰好两个元素在p（i）和p（i+1）之间。 |
|
1
|
|
|
|
1, 1, 2, 6, 4, 4, 4, 4, 8, 12, 20, 32, 52, 104, 188, 344, 616, 1116, 2232, 4236, 8084, 15212, 28760, 57520, 111512, 216804, 417560, 806440, 1612880, 3162132, 6209192, 12113136, 23670168, 47340336, 93411704, 184494460, 362693224, 713767712, 1427535424
(列表；图表；参考；听；历史；文本；内部格式)
|
|
|
|
偏移
|
0.3
|
|
|
链接
|
|
|
|
例子
|
a（4）=4:2314，2341，3214，3241。
a（5）=4:23514，32514，34152，43152。
a（6）=4:341625346152431625436152。
a（7）=4:3471625、4371625、4517263、5417263。
a（8）=8:34716258、43716258，45182736、45817263、54182736，54817263，56283741，65283741。
a（9）=12:348172596，438172596，451827369，459182736，541827369。
|
|
|
MAPLE公司
|
b： =proc（u，o）选项记忆`如果`（u+o<3，（u+o）！，
`如果`（o>2，b（排序（[o-3，u+2]）[]），0）+
`如果`（u>2，b（排序（[u-3，o+2]）[]），0）
结束时间：
a： =n->`如果`（n=0，1，加（b（排序（[j-1，n-j]）[]），j=1..n））：
seq（a（n），n=0..40）；
|
|
|
数学
|
b[u_，o_]：=b[u，o]=如果[u+o<3，（u+o）！，
如果[o>2，b@@Sort[{o-3，u+2}]，0]+
如果[u>2，b@@Sort[{u-3，o+2}]，0]]；
a[n_]：=如果[n==0，1，和[b@@排序[{j-1，n-j}]，{j，1，n}]]；
|
|
|
交叉参考
|
囊性纤维变性。A174700个,A174701号,A174702号,A174703号,A174704号,A174705号,A174706号,A174707号,A174708号,A185030型,2016年2月37日.
|
|
|
关键词
|
非n
|
|
|
作者
|
|
|
|
状态
|
经核准的
|
| |
|
|
