A: =proc(n,k)系数(x/(1-x-x^3)/(1-x)^(k-1),x=0,n)结束:
a: =n->a(n,n):
seq(a(n),n=0..30);
#第二个Maple项目:
a: =proc(n)选项记忆`如果`(n<3,n,
((27*n^3-150*n^2+195*n-12)*a(n-1)
-(66*n^3-382*n^2+492*n+124)*a(n-2)
+(27*n^3-156*n^2+201*n+48)*a(n-3)
-2*(2*n-7)*(3*n^2-7*n-2)*a(n-4))/((n-1)*(3*n^2-13*n+8))
结束时间: