%I#9 2022年1月5日18:16:50
%S 1,622649116360536470125645271412582472897629389744448,
%电话:31955247002601164172495331506285159811841234857,
%电话:445278234956999173623439356241896743038912409423916979629786322650253088667210585249
%N a(N)=(A126086(N)-3*A001850(N)+2)/6。
%H G.C.Greubel,n表,n=1..500时的a(n)</a>
%F a(n)=和{m>=0}二项式(二项式,m,n),3)/2^(m+1)。
%p A126086:=进程(n)局部x,y,z;coeftayl(coeftayl(coeftyl(1/(1-x-y-z-x*y-x*z-y*z-xx*y*z),z=0,n),y=0,n),x=0,m);结束:A001850:=进程(n)局部k;加(二项式(n,k)*二项式(n+k,k),k=0..n);结束:A137219:=进程(n)(A126086(n)-3*A001850(n)+2)/6;结束:序列(A137219(n),n=1..30);#_R.J.Mathar,2008年4月1日
%t A126086[n_]:=A126086[n]=和[(-1)^k*二项式[n+k,n]*超几何PFQ[{-k,n+1,n+1},{1,1},1],{k,0,2*n}];
%t A001850[n_]:=超几何C2F1[-n,n+1,1,-1];
%t A137219[n]:=(A126086[n]-3*A001850[n]+2)/6;
%t表[A137219[n],{n,30}](*_G.C.格鲁贝尔,2022年1月5日*)
%o(鼠尾草)
%o定义A137219(n):返回圆(和(二项式(j,n),3)/2^(j+1),用于(0..1000)中的j))
%o[A137219(n)代表n in(1..30)]#_G.C.Greubel_,2022年1月5日
%Y参考A001850、A047665、A126086、A137220。
%K容易,不是
%O 1,2号机组
%2008年3月6日、3月16日,A_Vladeta Jovovic_
%E更多条款来自R.J.Mathar_,2008年4月1日
|