%I#57 2022年9月8日08:45:05
%S 1,0,0,4,4,2,4,0,8,3,4,9,10,5,3,12,4,10,6,19,0,10,21,19,16,3,
%电话:27,24,12,14,7,33,27,15,28,15,7,15,72,13,29,16,44,39,27,39,17,6,
%U 18,2,21,21,35,29,12,13,6,39,14,12,23,55,34,10,42,70,14,42,26,74,64,12,42,14
%N zeta(5)的阶乘展开=Sum_{N>=1}a(N)/N!,a(n)尽可能大。
%H G.C.Greubel,n表,n=1..5000的a(n)(文森佐·利班迪的术语1..300)
%H维基百科,<a href=“https://en.wikipedia.org/wiki/Factorial_number_system网站“>阶乘数系统</a>
%非整数常数的阶乘基表示的索引项</a>
%F a(n)=楼层(c*n!)-n*楼层(c*(n-1)!)=地板(压裂(c*(n-1)!)*n) 对于n>1,c=zeta(5)_M.F.Hasler,2018年12月20日
%t t=泽塔[5];s={};Do[n=楼层[t*i!];t-=不适用!;附加到[s,n],{i,1,30}];s(*_Amiram Eldar_,2018年11月25日*)
%t与[{b=Zeta[5]},表[If[n==1,Floor[b],Floor[n!*b]-n*Floor[(n-1)!*b],{n,1,100}]](*_G.C.Greubel_,2018年11月26日*)
%o(PARI)向量(N=100,N,如果(N>1,c=c%1*N,c=zeta(精度(5.,N*log(N/2.7)\2.3+3)))\1)\\特定a(N)可以通过公式计算。对于重复使用,c的值可以存储为全局变量,当log_10(n!)超过其精度时,以更高的精度重新计算。-_M.F.Hasler,2018年11月25日
%o(Magma)SetDefaultRealField(RealFild(250));b: =评估(RiemannZeta(),5);[n eq 1选择Floor(b)else Floor(Factorial(n)*b)-n*Floor(阶乘(n)*b/n):[1..100]]中的n;//_G.C.Greubel,2018年11月26日
%o(鼠尾草)
%o b=zeta(5)
%o@cached_function
%o定义A068454(n):
%o如果n==1:返回楼层(b)
%o else:返回展开(floor(factorial(n)*b)-n*floor(阶乘(n-1)*1))
%o[A068454(n)表示n in(1..100)]#_G.C.Greubel_,2018年11月26日
%Y参考A075874(与Pi相同),A007514(不同变体)。
%Y参见A067279(泽塔(2))、A067277(泽塔)、A068447(泽达(4))、P068455(泽塔6)、A068 456(泽塔7)、A06 8457(泽塔8)、A0 68458(泽塔9)、A064 59(泽塔10)。
%K nonn公司
%O 1,5型
%2002年3月10日,A _贝尼特·克洛伊特
%2018年11月25日,M.F.Hasler_编辑了E Name并删除了关键字cons
|