|
|
A213279型 |
| 按行读取的三角形:T(n,k)(n>=1,1<=k<=n)=[1..n]的置换数,其中所有循环长度都可被k整除。 |
|
2
|
|
|
1, 2, 1, 6, 0, 2, 24, 9, 0, 6, 120, 0, 0, 0, 24, 720, 225, 160, 0, 0, 120, 5040, 0, 0, 0, 0, 0, 720, 40320, 11025, 0, 6300, 0, 0, 0, 5040, 362880, 0, 62720, 0, 0, 0, 0, 0, 40320, 3628800, 893025, 0, 0, 435456, 0, 0, 0, 0, 362880, 39916800, 0, 0, 0, 0, 0, 0, 0, 0, 0, 3628800
(列表;桌子;图表;参考;听;历史;文本;内部格式)
|
|
|
抵消
|
1,2
|
|
链接
|
E.D.Bolker和A.M.Gleason,计算排列、J.Combina.Thy.、。,A 29(1980),236-242。
|
|
例子
|
三角形开始
[1],
[2, 1],
[6, 0, 2],
[24, 9, 0, 6],
[120, 0, 0, 0, 24],
[720, 225, 160, 0, 0, 120],
[5040, 0, 0, 0, 0, 0, 720],
[40320, 11025, 0, 6300, 0, 0, 0, 5040],
[362880, 0, 62720, 0, 0, 0, 0, 0, 40320],
[3628800, 893025, 0, 0, 435456, 0, 0, 0, 0, 362880],
[39916800, 0, 0, 0, 0, 0, 0, 0, 0, 0, 3628800],
[479001600, 108056025, 68992000, 56133000, 0, 46569600, 0, 0, 0, 0, 0, 39916800],
...
|
|
枫木
|
读取转换;
f: =(n,d)->倍数(n-j+did(j,d),j=1..n);#did(d,j)=1 iff j除以d,否则为0
g: =n->[序列(f(n,d),d=1..n)];
[序列(g(n),n=1..14)];
#第二个Maple项目:
T: =proc(n,k)选项记忆`如果`(n=0,1,添加(
`如果`(irem(j,k)=0,二项式(n-1,j-1)*(j-1)*
T(n-j,k),0),j=1..n))
结束时间:
seq(seq(T(n,k),k=1..n),n=1..12)#阿洛伊斯·海因茨2016年5月14日
|
|
数学
|
T[n_,k_]:=T[n,k]=If[n==0,1,Sum[If[Mod[j,k]==0,二项式[n-1,j-1]*(j-1)!*T[n-j,k],0],{j,1,n}]];
|
|
交叉参考
|
|
|
关键词
|
|
|
作者
|
|
|
状态
|
经核准的
|
|
|
|