%I#31 2024年3月3日18:44:12
%第20、8452810403604788103041440026100341005544069264104468页,
%电话:126420180480213248291924338580448400512400660745844,
%电话:9406081051200130130014419081756944193256023290025389003015680327782438529484167380
%所有项都在{-N,…,0,..,N}和正奇数行列式中的2X2矩阵的个数。
%C有关相关序列的指南,请参见A210000。
%H Chai Wah Wu,n的表,n的a(n)=1..10000</a>
%H<a href=“/index/Rec#order_09”>带常系数的线性重复出现的索引条目,签名(1,4,-4,-6,6,4,-40,-1,1)。
%F From _ Chai Wah Wu_,2016年12月13日:(开始)
%F对于n>=0:
%F a(n)=A211155(n)/2。
%F a(n)=n*(n+1)*(3*n+1+3*n^2-(-1)^n*(2*n+1))。因此:
%F a(n)=n^2*(n+1)*(3*n+1)如果n是偶数,
%如果n是奇数,则F a(n)=n*(n+1)^2*(3*n+2)。
%当n>9时,F a(n)=a(n-1)+4*a(n-2)-4*a(n3)-6*a(n-4)+6*a(-n5)+4*a(n-6)-4*a(n-7)-a(n-8)+a(n-9)。
%传真:x*(-20*x^6-64*x^5-364*x^4-256*x^3-364*x^2-64*x-20)/((x-1)^5*(x+1)^4)。(结束)
%F a(n)=a(-n-1)_Bruno Berselli,2016年12月14日
%t a=-n;b=n;z1=25;
%t t[n_]:=t[n]=扁平[表[w*z-x*y,{w,a,b},{x,a,b},}
%t c[n_,k_]:=c[n,k]=计数[t[n],k]
%tu[n_]:=u[n]=和[c[n,2k],{k,0,2*n^2}]
%tv[n]:=v[n]=和[c[n,2k],{k,1,2*n^2}]
%tw[n]:=w[n]=和[c[n,2k-1],{k,1,2*n^2}]
%t u1=表[u[n],{n,1,z1}](*A211156*)
%t v1=表格[v[n],{n,1,z1}](*A211157*)
%t w1=表格[w[n],{n,1,z1}](*A211158*)
%t(u1-1)/4(*整数*)
%t v1/4(*整数*)
%t w1/4(*整数*)
%t表[n*(n+1)*(3*n+1+3*n^2-(-1)^n*(2*n+1)),{n,35}](*_Vincenzo Librandi_,2016年12月14日*)
%t系数列表[级数[-((4(5+16x+91x^2+64x^3+91x^4+16x^5+5x^6))/((x-1)^5(x+1)^4)),{x,0,35}],x](*或*)
%t线性递归[{1,4,-4,-6,6,4,-4,-1,1},{20,84,528,1040,3060,4788,10304,14400,26100},36](*_Robert G.Wilson v_,2016年12月14日*)
%o(Python)
%o定义A211158(n):
%o报税表n*(n+1)*(3*n+1+3*n**2-(-1)**n*(2*n+1))#_Chai Wah Wu_,2016年12月13日
%o(岩浆)[n*(n+1)*(3*n+1+3*n^2-(-1)^n*(2*n+1)):n in[1..35]];//_文森佐·利班迪(Vincenzo Librandi),2016年12月14日
%Y参考A210000。
%K nonn,简单
%O 1,1号机组
%《百灵鸟金伯利》,2012年4月5日
|