%I#10 2016年5月31日02:45:30
%S 1,2,1,31381565982353916635843139956546799221357968343205,
%电话:3259061012730845549730179419426007887588340434296421517,
%电话:1157906458544523106424071766851828392690181726382426960427965352
%N G.f.:A(x)=1/(1-2*x-7*x^2-2*x^3+x^4)。
%H G.C.Greubel,n表,n=0..1000时的a(n)</a>
%H<a href=“/index/Rec#order_04”>具有常系数的线性递归索引条目,签名(2,7,2,-1)。
%F G.F.:A(x)=exp(总和{n>=1}A000204(n)*A002203。
%F递归:a(n)=2*a(n-1)+7*a(n-2)+2*a(n-3)-a(n-4),其中a(k)=0表示k<0,a(0)=1。
%F收敛半径:r=F*p,其中F=(sqrt(5)-1)/2,p=sqrt(2)-1:
%F(F*p-x)*(1/(F*p)-x)*。
%F对于n>=2,a(n)-a(n-2)=Fibonacci(n+1)*Pell(n+1”)=A001582(n)_Peter Bala_,2015年8月30日
%t线性递归[{2,7,2,-1},{1,2,11,38},100](*_G.C.Greubel_,2016年5月30日*)
%o(PARI){a(n)=极系数(1/(1-2*x-7*x^2-2*x^3+x^4+x*o(x^n)),n)}
%o(PARI){a(n)=如果(n<0.0,如果(n==0,1,2*a(n-1)+7*a(n-2)+2*a(n-3)-a(n-4))}
%Y参见A000204、A000045、A002203、A000129、A001582。
%K nonn公司
%0、2
%A·保罗·D·汉纳,2009年10月26日
|