(PARI)我的(x='x+O('x^30));向量((1-4*x+x^2)/(1-11*x+7*x^2-x^3))\\G.C.格鲁贝尔2019年10月27日
(Magma)R<x>:=PowerSeriesRing(整数(),30);系数(R!((1-4*x+x^2)/(1-11*x+7*x^2-x^3)); //G.C.格鲁贝尔2019年10月27日
(鼠尾草)
P.<x>=PowerSeriesRing(ZZ,prec)
返回P((1-4*x+x^2)/(1-11*x+7*x^2-x^3)).list()
(间隙)a:=[1,7,71];;对于[4..30]中的n,做a[n]:=11*a[n-1]-7*a[n-2]+a[n-3];od;a#G.C.格鲁贝尔2019年10月27日