编辑
提出
彼得·卢什尼：Sehr gut，mein lieber先生！
seq（`if`（floor（sqrt（k）））*（floor，操作([])无效的)，k=0..2034）；#a（1）。。a（1000），雷纳尔·罗森塔尔2024年7月19日
经核准的
雷纳尔·罗森塔尔：将“op（[]）”分解为Maple预定义的“NULL”表达式。没有什么复杂的：-）
数字k，使楼层（sqrt（k））*-雷纳尔·罗森塔尔2024年7月19日
seq（`if`（floor（sqrt（k））*（floor（sqrt（k））+1）>k，k，op（[]）），k=0..2034）#a（1）-a（1000），雷纳尔·罗森塔尔2024年7月19日
a（n）是M（2n+1）的行列式，其中M（k）是k X k矩阵，如果i+j=k M（i，j）=i，则M（i）=j。 - 改编 到 抵消 0, _雷纳 罗森塔尔_, 六月 19 2024
L（n）= 整数（t=0，1，log（1-1/t）^n）；
/*_Gerry Martens公司, _, 2011年3月7日*/
（岩浆）I:=[1,3]；[n le 2选择I[n]其他（4*n^2-8*n+3）*Self（n-1）：[1..20]]中的n//_文森佐·利班迪, _, 2014年11月18日
（PARI）{a（n）=如果（n<0，-1/self（）（-1-n），（2*n+1）！*（2*n）！/（n！*2^n）^2）}/*_迈克尔·索莫斯, _, 2017年5月4日*/
（PARI）{a（n）=如果（n<0，-1/self（）（-1-n），my（m=2*n+1）；m！*polceoff（x/sqrt（1-x^2+x*O（x^m）），m））}/*_迈克尔·索莫斯, _, 2017年5月4日*/
雷纳尔·罗森塔尔：我无意中删除了PROGRAM部分中名称的下划线。它们现在已恢复。遗憾的是，其他公式和程序可能会受到#45中偏移量变化的影响。我会谨慎地更新它们。这不是一项容易的任务，可能是阿洛伊斯自己做的吗？
A079484号：=proc（n）局部k，m，m，i，j；k:=2*n+1；m:=（i，j）->`如果`（i+j=k，j，i）；M：=矩阵（[seq（[seque（M（i，j），j=1..k）]，i=1.k）]）；返回行列式（M）；结束：seq(A079484号（n） ，n=0..14）#雷纳尔·罗森塔尔2024年6月18日
（Maple）a:=proc（n）局部k，m，m，i，j；k:=2*n+1；m:=（i，j）->`如果`（i+j=k，j，i）；M：=矩阵（[seq（[seque（M（i，j），j=1..k）]，i=1.k）]）；返回行列式（M）；结束：seq（a（n），n=0..14）#雷纳尔·罗森塔尔2024年6月18日
雷纳尔·罗森塔尔：可能有更多的公式受偏移量更改#45的影响。
L（n）=整数（t=0， 1, 对数（1-1/t）^n）；
/*_Gerry Martens公司_, , 2011年3月7日*/
（岩浆）I:=[1， 3]; [n le 2选择I[n]其他（4*n^2-8*n+3）*Self（n-1）：[1..20]]中的n//_文森佐·利班迪_, , 2014年11月18日
（PARI）{a（n）=如果（n<0，-1/self（）（-1-n），（2*n+1）！*（2*n）！/（n！*2^n）^2）}/*_迈克尔·索莫斯_, , 2017年5月4日*/
（PARI）{a（n）=如果（n<0，-1/self（）（-1-n），my（m=2*n+1）；m！*polceoff（x/sqrt（1-x^2+x*O（x^m）），m））}/*_迈克尔·索莫斯_, , 2017年5月4日*/
由于偏移量从1变为0而修改的a（n）的第一个定义-雷纳尔·罗森塔尔2024年6月18日
a（n）是M（2n）的行列式-+1） 其中M（k）是k X k矩阵，如果i+j=k M（i，j）=i，则M（i、j）=j。
1, 3, 3, 15, 45, 15, 105, 1575, 1575, 105, 945, 99225, 510525, 99225, 945, 10395, 9823275, 376473825, 376473825, 9823275, 10395, 135135,1404728325
雷纳尔·罗森塔尔：对不起，我忘了
