|
| |
|
| A073364号 |
| （1,2,3，…，n）的置换p的个数，使得k+p（k）是1<=k<=n的素数。 |
|
12
|
|
|
|
1, 1, 1, 4, 1, 9, 4, 36, 36, 676, 400, 9216, 3600, 44100, 36100, 1223236, 583696, 14130081, 5461569, 158180929, 96275344, 5486661184, 2454013444, 179677645456, 108938283364, 5446753133584, 4551557699844, 280114147765321, 125264064932449, 9967796169000201
(列表;图表;参考;听;历史;文本;内部格式)
|
|
|
|
抵消
|
1,4
|
|
|
评论
|
a（n）=永久（m），其中n X n矩阵m由m（i，j）=1或0定义，取决于i+j分别是质数还是复合数-T.D.诺伊2007年10月16日
|
|
|
链接
|
保罗·布拉德利，素数和，arXiv:1809.01012[math.GR]，2018年。
|
|
|
配方奶粉
|
|
|
|
数学
|
am[n_]：=永久[数组[Boole[PrimeQ[2#1+2#2-1]]&，{n，n}]]；
ap[n_]：=永久[Array[Boole[PrimeQ[2#1+2#2+1]]&，{n，n}]]；
a[n_]：=如果[n==1，1，如果[EvenQ[n]，am[n/2]^2，ap[（n-1）/2]^2]；
|
|
|
黄体脂酮素
|
（PARI）a（n）=和（k=1，n！，n==和（i=1，n，i素数（i+分量（n，k），i））
（PARI）a（n）={矩阵（n，n，i，j，isprime（i+j））}\\安德鲁·霍罗伊德2018年11月3日
（哈斯克尔）
a073364 n=长度$filter（全部为i素数）
$map（zipWith（+）[1..n]）（排列[1..n]]）
|
|
|
交叉参考
|
|
|
|
关键词
|
非n
|
|
|
作者
|
|
|
|
扩展
|
a（10）摘自Mohammed Bouayoun（bouyao（AT）wanadoo.fr），2004年3月14日
a（12）-a（17）来自约翰·莱曼2004年7月21日
|
|
|
状态
|
经核准的
|
| |
|
|
