%I#28 2022年12月2日07:03:58
%S 1,1212612601228511793612039210563699034650924323400,
%电话:85962076207971028840737320171770680603235480062726697800,
%电话:576957085619760530079322413154548642573115560060445890253559359300550408341600627991030036363256457461179245341606916182502210240
%N a(N)=(3^N/N!)*产品{k=0..N-1}(3*k+4)。
%H G.C.Greubel,n表,n=0..1000时的a(n)</a>
%F G.F.:(1-9*x)^(-4/3)。
%F a(n)~3*伽马(1/3)^-1*n^(1/3)*3^(2*n)*(1+2/9*n^-1-…)。
%F a(n)=(3^(2*n))/(积分_{x=0..1}(1-x^3)^n dx).-Al Hakanson(hawkuu(AT)excite.com),2003年12月4日
%带递归的F D-有限:n*a(n)+3*(-3*n-1)*a(n-1)=0.-_R.J.Mathar,2020年1月17日
%F和{n>=0}1/a(n)=sqrt(3)*Pi/8+3*log(3)/8.-_Amiram Eldar,2022年12月2日
%p a:=n->(3^n/n!)*乘积(3*k+4,k=0..n-1);序列(a(n),n=0..25);#_G.C.Greubel,2019年8月22日
%t表[9^n*Pochhammer[4/3,n]/n!,{n,0,25}](*_G.C.格鲁贝尔,2019年8月22日*)
%t表[3^n/n!乘积[3k+4,{k,0,n-1}],{n,0,30}](*或*)系数表[级数[1/Surd[(1-9x)^4,3],{x,0,30}],x](*H arvey P.Dale_,2021年8月2日*)
%o(PARI)a(n)=3^n*prod(k=0,n-1,3*k+4)/n!;
%o矢量(25,n,n-;a(n))\\_G.C.Greubel_,2019年8月22日
%o(岩浆)[1]cat[3^n*(&*[3*k+4:k in[0..n-1]])/阶乘(n):n in[1..25]];//_G.C.Greubel,2019年8月22日
%o(Sage)[9^n*rising_factorial(4/3,n)/factrial(n)for n in(0..25)]#_G.C.Greubel_,2019年8月22日
%o(GAP)列表([0..25],n->3^n*产品([0..n-1],k->3*k+4)/因子分解(n));#_G.C.Greubel,2019年8月22日
%Y参考A004988、A004989、A004990、A004992。
%K nonn,简单
%0、2
%乔·基恩(jgk(AT)jgk.org)
%E条款a(16)由_G.C.Greubel于2019年8月22日添加
|