|
| |
|
| A356484型 |
| a（n）是对称Toeplitz矩阵M（2*n）的hafnian，其第一行由素数（2*n）、素数（2-n-1）、…、。。。，素数（1）。 |
|
9
|
|
|
|
1, 2, 44, 5210, 1368900, 604109562, 535920536336, 728155179271474, 1103827431509790216, 2651375713654260218986, 7537958658258053003685636
(列表;图表;参考;听;历史;文本;内部格式)
|
|
|
|
抵消
|
0,2
|
|
|
评论
|
|
|
|
链接
|
|
|
|
例子
|
a（2）=44，因为
7 5 3 2
5 7 5 3
3 5 7 5
2 3 5 7
等于M_{1,2}*M_{3,4}+M_{1,3}*M_{2,4}+M_{1,4}*M_2,3}=44。
|
|
|
MAPLE公司
|
haf:=进程（A）
局部n，s，Pairpart，p；
配对：=proc（L）局部j，t；如果L＝｛｝，则返回｛｛｝｝；结束条件：；{seq（seq（序列（{{L[1]，L[j]}}联合t，t=进程名（L减去{L[1]，L[j]}）），j=2。。nops（L）}；终末程序；
n:=线性代数：-维数（A）；
如果n[1]<>n[2]，则
误差“必须是方阵”；
结束条件：；
n：=n[1]；
如果n：：奇数则
错误“矩阵维数必须是偶数”；
结束条件：；
加法（mul（A[s[1]，s[2]，s=p），p=Pairpart（{$（1..n）}））；
结束进程：
f： =proc（n）局部i；haf（线性代数：-ToeplitzMatrix（[seq（ithprime（i），i=2*n..1，-1）]，对称））结束过程：
f（0）：=1：
|
|
|
数学
|
k[i_]：=素数[i]；M[i_，j_，n_]：=部件[Part[ToeplitzMatrix[Reverse[Array[k，n]]，i]，j]；a[n_]：=和[Product[M[Part[PermutationList[s，2n]，2i-1]，Part[PermutationList[s，2]，2i]，2n]{i，n}]，{s，SymmetricGroup[2n]//GroupElements}]/（n！*2^n）；数组[a，6，0]
|
|
|
黄体脂酮素
|
（PARI）tm（n）=my（m=矩阵（n，n，i，j，如果（i==1，素数（n-j+1），如果（j==1、素数（n-i+1））））；对于（i=2，n，对于（j=2，n，m[i，j]=m[i-1，j-1]；）；）；米；
a（n）=我的（m=tm（2*n），s=0）；forperm（[1..2*n]，p，s+=产品（j=1，n，m[p[2*j-1]，p[2*j]]）；）；s/（n！*2^n）\\米歇尔·马库斯2023年5月2日
|
|
|
交叉参考
|
|
|
|
关键词
|
非n,坚硬的,更多
|
|
|
作者
|
|
|
|
扩展
|
|
|
|
状态
|
经核准的
|
| |
|
|
