%I#14 2021年2月9日02:41:12
%S 1,1,1,1,1,1,1,1,1,1,1,6,6,11,21,21,26,41,56,86121181256381541801,
%电话114616862426355151317486108411579122896333214834670321,
%电话:10207614841621550631325645496166120696044613956862027501
%N a(N)=a(N-2)+a(N-4)+aa(9)=1。
%C Shannon用特征多项式x^10+x^8+x^7+x^5+x^4+x^2-1=0提到了这种递归,与信道容量Cp=Log[W]=Log[xroot_max]=0.539。
%D Claude Shannon和Warren Weaver,《传播数学理论》,伊利诺伊大学出版社,芝加哥,1963年,第37-38页。
%H G.C.Greubel,n的表,n=0..1000的a(n)</a>
%H<a href=“/index/Rec#order_10”>为具有常数系数的线性递归索引条目</a>,签名(0,1,0,1,1,0,1,0,1,0,1,0,1,0,1)。
%财务报表:(1+x-x^4-2*x^5-2*x ^6-3*x ^7-4*x ^8-4*x^9)/(1-x^2-x^4-x^5-x^7-x^8-x^10)_R.J.Mathar,2007年12月5日
%ta[n_]:=a[n]=如果[n<10,1,a[n-2]+a[n-4]+a[n-5]+a[n-7]+a[0-8]+a[10]];
%t表[a[n],{n,0,50}]
%o(鼠尾草)
%o定义A122762_llist(prec):
%o P.<x>=PowerSeriesRing(ZZ,prec)
%o返回P((1+x-x^4-2*x^5-2*x^6-3*x^7-4*x^8-4*x^9)/(1-x^2-x^4-x^5-x^7-x^8-x^10)).list()
%o A122762_llist(50)#_G.C.格鲁贝尔,2021年2月8日
%o(岩浆)
%o R<x>:=PowerSeriesRing(基本原理(),50);
%o系数(R!((1+x-x^4-2*x^5-2*x^6-3*x^7-4*x^8-4*x^9)/(1-x^2-x^4-x^5-x^7-x^8-x^10));//_G.C.Greubel,2021年2月8日
%Y参考A143351、A143372、A1433703、A143355。
%K nonn公司
%O 0,11号
%A _Roger L.Bagula,2006年9月21日
%E编辑:N.J.A.Sloane,2007年5月9日