|
%I #19 Jan 21 2019 17:53:46
%S 6,4,0,3,2,0,0,0,0,0,0,0,0,0,0,6,0,4,8,6,3,7,3,5,0,4,9,0,1,6,0,3,9,4,
%T 7,1,7,4,1,8,1,8,8,1,8,5,3,9,4,7,5,7,7,1,4,8,5,7,6,0,3,6,6,5,9,1,8,1,
%U 9,4,6,5,2,2,1,8,2,5,8,2,8,6,9,4,2,5,3,6,3,4,0,8,1,5,8,2,2,6,4
%N Decimal expansion of exp(Pi*sqrt(163)/3).
%D J. M. Borwein, D. H. Bailey and R. Girgensohn, Experimentation in Mathematics, A K Peters, Ltd., Natick, MA, 2004. x+357 pp. See p. 128.
%F Equals cube root of A060295. - _Michel Marcus_, Sep 08 2014
%e 640320.00000000060486373504901603947174181881853947577148576...
%t RealDigits[Exp[(Pi Sqrt[163])/3],10,120][[1]] (* _Harvey P. Dale_, Jan 21 2019 *)
%o (PARI)
%o default(realprecision,1000);
%o first(n)=digits(floor(10^(n-6)*exp(Pi*sqrt(163)/3))) \\ _Edward Jiang_, Sep 07 2014
%Y Cf. A190574.
%K nonn,cons
%O 6,1
%A _N. J. A. Sloane_, May 12 2011
|
