|
%I #21 Mar 19 2024 08:41:56
%S 4,8,0,0,6,0,2,4,8,0,7,6,6,7,3,1,8,3,0,5,5,7,5,5,2,2,9,0,1,8,6,6,5,7,
%T 5,5,2,5,2,2,7,8,0,6,0,3,8,8,5,3,6,6,5,6,2,9,6,7,4,8,2,1,5,3,8,8,6,7,
%U 5,1,0,4,4,2,7,7,1,9,0,9,3,2,1,9,3,7,5,3,6,2,7,3,8,9,4,6,9,5,7,2,8,3,8,8,2
%N Decimal expansion of -log_Pi(gamma), where gamma is the Euler-Mascheroni constant.
%H G. C. Greubel, <a href="/A182500/b182500.txt">Table of n, a(n) for n = 0..10000</a>
%F Equals |A002389/A053510|.
%e 0.48006024807667318305575522901866575525227806038853...
%t RealDigits[ N[Log[EulerGamma]/Log[Pi], 105]] [[1]]
%o (PARI) default(realprecision, 100); -log(Euler)/log(Pi) \\ _G. C. Greubel_, Sep 01 2018
%o (Magma) SetDefaultRealField(RealField(100)); R:= RealField(); -Log(EulerGamma(R))/Log(Pi(R)); // _G. C. Greubel_, Sep 01 2018
%Y Cf. A001620, A000796.
%K nonn,cons
%O 0,1
%A _Volker Werner_, May 02 2012
|
