G: =(2*z*C-z+C)/(1+z*C):C:=((1-4*z))*1/2)/z:Gser:=系列(G,z=0,30):seq(系数(Gser,z,n),n=0..25)#Emeric Deutsch公司2007年12月13日
a: =proc(n)options操作符,箭头:二项式(2*n-2,n-1)/n+(总和((-1)^j*(j+3)*二项式(2xn-j-2,n),j=0..n-2))/(n+1)结束proc:1,seq(a(n),n=1..25)#Emeric Deutsch公司2007年12月13日
#第三个Maple项目:
a: =proc(n)选项记忆`如果`(n<4,[1$2,2,4][n+1],
((5*n-1)*a(n-1)+(11*n-28)*a
结束时间:
A135339列表:=proc(m)局部A,P,n;答:=[1,1,2];P:=[1,2];
对于从1到m-2的n,做P:=ListTools:-部分和([op(P),P[-2]]);
A:=[op(A),P[-1]]od;A结束:A135339列表(28)#彼得·卢什尼2022年3月26日