(PARI){a(n)=我的(u=斐波那契(n),v=斐波纳契(n-1));
(PARI){a(n)=如果(n<1,n=1-n);波尔科夫(-(1-4*x-24*x^2+6*x^3-4*x^4)/(1-x)*(1+3*x+x^2)*(1-7*x+x2))+x*O(x^n),n)};
(岩浆)m:=60;R<x>:=PowerSeriesRing(整数(),m);系数(R!(-(1-4*x-24*x^2+6*x^3-4*x^4)/((1-x)*(1+3*x+x^2)*(1-7*x+x^2)))//G.C.格鲁贝尔,2018年8月5日