%I#7 2023年10月2日13:09:47

%S 2,6,8,0,1,5,2,1,2,7,1,0,7,3,3,1,5,6,86,9,5,3,8,3,2,8,6，

%温度7,9,5,0,0,6,6,6，7,5,7,2,4,2,0,3,9,4,6,4,4,5,9,0,4,1,5,8,4,6，9,5,1,3，

%U 9,0,9,4,9,9,2,6,7,0,6,0,0,5,4,3,5,0,1,7,4,2,3,9,4],2,3,1,9,5,2,0,8,3,2,1,1

%N与A008485和A327215相关的常数的十进制展开式。

%F等于极限{n->infinity}A008485（n）*sqrt（n）/A270915^n。

%电话：0.2680152127107333156869538283286795006667572420394264459045904159463909499267。。。

%t val=Sqrt[（1-r*s）*（Log[r*s]^2/（2*Pi*（4*ArcTanh[1-2*r*s]*（r*s+（-1+r*s s]+（1-r*s）*QPolyGamma[0，1，r*s]^2+（-1+r*s[QPochhammer][r*s，r*s]-2*导数[0，0，1][QPolyGamma][0，1，r*s））]/。FindRoot[{QPochhammer[r*s]==1/s，1/s+r*s*导数[0，1][QPochharmer][r*s，r*s]==（Log[1-r*s]+QPolyGamma[0，1，r*s）/（s*Log[r*s]）}，{r，1/5}，}s，2}，工作精度->1000]；RealDigits[Chop[val]，10，-Floor[Log[10，Abs[Im[val]]]-3][1]（*_Vaclav Kotesovec_，2023年10月2日*）

%Y参见A008485、A270915、A327215、A372280、A366022。

%K nonn，cons公司

%0、1

%A _卡拉夫·科特索维奇，2019年8月28日