%I#9 2022年5月24日00:10:04
%S 1,0,2,0,2,2,6,6,0,3,11,11,7,6,14,1,8,12,15,8,17,8,1,13,15,3,4,10,16,
%电话25,1,25,22,6,3,19,17,8,10,25,37,29,17,35,19,24,25,30,31,4,7,51,49,14,
%U 51、45、54、0、26、34、41、56、57、16、15、63、4、51、42、13、35、12、15、66、22、13、43、14、78
%N伽马(2/3)的阶乘展开=Sum_{N>=1}a(N)/N!。
%H<a href=“https://oeis.org/index/Fa#facbase网址“>阶乘基表示的索引项</a>
%e伽马(2/3)=1+0/2!+2/3! + 0/4! + 2/5! + 2/6! + 6/7!+6/8! + ...
%t使用[{b=Gamma[2/3]},表[If[n==1,Floor[b],Floor[n!*b]-n*Floor[(n-1)!*b]],{n,1,100}]]
%o(PARI)默认值(realprecision,250);b=γ(2/3);对于(n=1,80,打印1(如果(n==1,楼层(b),楼层(n!*b)-n*楼层((n-1)*b) ),“,”)
%o(Magma)SetDefaultRealField(RealFild(250));[地板(γ(2/3))]cat[地板(阶乘(n)*Gamma(2/3;
%o(鼠尾草)
%o b=γ(2/3);
%o定义a(n):
%o如果(n==1):返回楼层(b)
%o else:返回展开(floor(factorial(n)*b)-n*floor(阶乘(n-1)*1))
%o[a(n)代表(1..80)中的n]
%Y参见A073006(十进制展开),A030652(连分数)。
%Y参见A068463(伽马射线(3/4))、A068464(伽马(1/4))、A322508(伽马线(1/3))。
%K nonn公司
%氧1,3
%A _G.C.Greubel,2018年12月12日
|