%I#19 2024年3月29日05:43:53
%S 1,1,14,4122397938782048370897408073132973479641725250959,
%电话:1540393394823018062967115019923703849757046572241177128072702,
%电话:1095861584537339852652966321043253658307652240985439264040104945843125151923775716881
%N(1+x-14*x^2+13*x^3)/(1-28*x^2+169*x^4)的展开。
%H Bruno Berselli,n的表格,n=0..1000时的a(n)</a>
%H<a href=“/index/Rec#order_04”>具有常数的线性重复出现的索引条目,签名(0,28,0,-169)。
%传真:(1+x-14*x^2+13*x^3)/(1-28*x^2+169*x^4)。
%F a(n)=((1+3*sqrt(3))^n+(1-3*sqrt^3)^n)/(2*2^楼层(n/2))。
%F a(n)=28*a(n-2)-169*a(n-4)。
%t线性递归[{0,28,0,-169},{1,1,14,41},25]
%t系数列表[系列[(1+x-14x^2+13x^3)/(1-28x^2+169x^4),{x,0,30}],x](*_哈维·P·戴尔,2017年11月8日*)
%o(PARI)Vec((1+x-14*x^2+13*x^3)/(1-28*x^2+169*x^4)+o(x^25))
%o(岩浆)I:=[1,1,14,41];[n le 4选择I[n]else 28*Self(n-2)-169*Self:n in[1..25]];
%o(Maxima)makelist(展开(((1+3*sqrt(3))^n+(1-3*sqort(3)^n)/(2*2^floor(n/2)),n,0,24);
%Y参考A002531、A083332。
%K nonn,简单
%0、3
%A Bbruno Berselli,2011年11月10日
|