%I#23 2018年8月1日20:36:28
%S 3,2,3,9,4,3,6,3,1,1,2,1,1,5,5,6,8,8,9,6,1,0,4,4,6,1,1,9,9,8,3,6,9,
%T 8,7,9,3,9,7,2,5,3,0,8,6,5,6,9,2,8,3,0,3,6,3,9,1,8,0,6,7,8,3,6,9,
%U 4,1,3,0,6,1,36,3,2,9,1,9,1,3,1,8,1,9,5,3,10,2,5,2,3,7,2,1,8,5,1,6,9,6,3~9
%N伽马最小解的十进制展开(log(x))=log(伽马(x)。
%H G.C.Greubel,n的表格,n=1..5000的a(n)</a>
%电子邮箱:3.23943631121155685896104461949836987939725308656592830363918066783694130613。。。
%t RealDigits[x/.FindRoot[Gamma[Log[x]]==Log[Gamma[x]],{x,3},WorkingPrecision->110]][1](*迈克尔·索莫斯,2015年9月9日*)
%o(PARI)解算(x=3,4,对数(伽马(x))-伽马(对数(x)
%o(PARI)解算(x=3,4,gamma(log(x))-lngamma
%K non,cons,简单
%O 1,1号机组
%A Devid Ferri_,2015年9月8日