|
%I #15 Sep 08 2022 08:46:02
%S 7,7,3,8,0,7,8,7,3,4,8,0,0,3,7,8,3,4,1,8,4,9,2,2,5,7,1,0,9,9,3,0,8,7,
%T 4,0,4,6,8,6,7,5,0,1,1,0,6,1,7,4,7,5,4,0,9,0,0,3,5,2,3,6,7,6,1,8,3,7,
%U 7,8,9,6,2,0,5,9,7,6,2,1,6,2,7,9,4,7,3,9,3,0
%N Decimal expansion of exp((gamma - 1)/sqrt(e)).
%C The median largest prime factor of {1, 2, ..., n} is asymptotically this constant times n^(1/sqrt(e)), see A212300.
%H G. C. Greubel, <a href="/A212299/b212299.txt">Table of n, a(n) for n = 0..10000</a>
%H Eric Naslund, <a href="http://arxiv.org/abs/1207.0232">The median largest prime factor and the mean of omega(n)</a>, arXiv:1207.0232 [math.NT], 2012-2013.
%e 0.7738078734800378341849225710993087404686750110617475409003523676183...
%t RealDigits[Exp[(EulerGamma - 1)/Sqrt[E]], 10, 100][[1]] (* _G. C. Greubel_, Sep 04 2018 *)
%o (PARI) exp((Euler-1)/exp(1/2))
%o (Magma) SetDefaultRealField(RealField(100)); R:= RealField(); Exp((EulerGamma(R)-1)/Sqrt(Exp(1))); // _G. C. Greubel_, Sep 04 2018
%Y Cf. A212300, A001620.
%K nonn,cons
%O 0,1
%A _Charles R Greathouse IV_, Jul 03 2012
|
