%I#24 2022年9月8日08:45:49
%S 6,6,13,13,20,20,27,27,34,41,48,58,55,62,69,69,76,83,
%电话:83,90,90,97,97104104111111118118125132139139146,
%电话146153153160160167167174181188188195195202202209
%N a(N)=6+7*层(N-1)/2)。
%H Vincenzo Librandi,n表,n=1..1000时的a(n)</a>
%H<a href=“/index/Rec#order_03”>具有常系数的线性重复出现的索引条目,签名(1,1,-1)。
%F a(n)=7*n-a(n-1)-2,当n>1时,a(1)=6。
%F G.F.:x*(6+x^2)/(1+x)*(x-1)^2)_文森佐·利班迪(Vincenzo Librandi),2013年9月17日
%F a(n)=a(n-1)+a(n-2)-a(n-3)_文森佐·利班迪(Vincenzo Librandi),2013年9月17日
%F a(n)=(14*n-7*(-1)^n+3)/4=A168374(n+1)-1=A168336(n)+1.-_Bruno Berselli,2013年9月17日
%例如:(1/2)*(2+(7*x-2)*cosh(x)+(7*x+5)*sinh(x))_G.C.Greubel,2016年7月18日
%t表[6+7楼层[(n-1)/2],{n,60}](*_Bruno Berselli_,2013年9月17日*)
%t系数列表[系列[(6+x^2)/(1+x)(x-1)^2),{x,0,70}],x](*_文森佐·利班迪,2013年9月17日*)
%t线性递归[{1,1,-1},{6,6,13},60](*或*)With[{c=NestList[#+7&,6,30]},Riffle[c,c]](*H arvey P.Dale_,2015年8月29日*)
%o(岩浆)[n eq 1选择6其他7*n-Self(n-1)-2:n in[1..70]];//_文森佐·利班迪(Vincenzo Librandi),2013年9月17日
%Y参考A168336,A168374。
%K nonn,简单
%O 1,1号机组
%A _文森佐图书馆_,2009年11月23日
%E根据Joerg Arndt_的建议,由_Bruno Berselli重新制定定义,并使用其公式,2013年9月17日
|