|
|
A285672型 |
| 避免[n-1]中所有i的连续奇数和i+p(i),(i+1)+p(i+1。 |
|
三
|
|
|
1, 1, 1, 2, 8, 36, 180, 1008, 6336, 46080, 374400, 3369600, 32659200, 344736000, 3886444800, 47348582400, 611264102400, 8442272563200, 122595843686400, 1890952003584000, 30510694932480000, 520011800985600000, 9231875243458560000, 172292221923655680000
(列表;图表;参考;听;历史;文本;内部格式)
|
|
|
抵消
|
0,4
|
|
链接
|
|
|
示例
|
a(0)=1:空置换。
a(1)=1∶1。
a(2)=1:12。
a(3)=2:123321。
a(4)=8:123414322413243132414312312312412142134231。
a(5)=36:12345、12543、13524、13542、14325、14523、15324、15342、24135、24153、24315、24351、24513、24531、31524、31542、32145、32541、34125、34521、35124、35142、42135、42153、42315、42351、42513、42531、51324、51342、52143、52341、53124、53142、54123、54321。
|
|
MAPLE公司
|
b: =proc(n,i,j,p,t)选项记忆`如果`(n=0,1,
`如果`(i=0或t=1并且p=1,0,i*b(n-1,i-1,j,1-p,p))+
`如果`(j=0或t=1且p=0,0,j*b(n-1,i,j-1,1-p,1-p))
结束时间:
a: =n->b(n,地板(n/2),天花板(n/2,1,0):
seq(a(n),n=0..25);
|
|
数学
|
b[n_,i_,j_,p_,t_]:=b[n,i,j,p,t]=
如果[n==0,1,如果[i==0||t==1&p==1,0,i*b[n-1,i-1,j,1-p,p]]+
如果[j==0||t==1&&p==0,0,j*b[n-1,i,j-1,1-p,1-p]];
a[n_]:=b[n,楼层[n/2],天花板[n/2],1,0];
|
|
交叉参考
|
|
|
关键词
|
非n
|
|
作者
|
|
|
状态
|
经核准的
|
|
|
|