|
%I #16 Sep 08 2022 08:45:13
%S 9,0,2,4,1,4,1,8,2,9,9,7,1,5,7,2,7,0,3,9,6,4,6,1,3,0,3,1,1,2,5,3,3,3,
%T 7,3,1,6,8,2,3,4,4,2,4,5,6,6,4,3,0,3,1,1,7,0,2,1,4,0,6,2,1,7,5,2,1,1,
%U 6,2,7,4,6,4,9,5,9,6,8,5,1,7,5,8,9,6,5,7,1,6,6,8,6,9,5,7,9,8,2,8,8,4
%N Decimal expansion of (8 - 4*sqrt(2) - log(2))/(-1 + 2*sqrt(2)).
%C Smoothed octagon packing density.
%H G. C. Greubel, <a href="/A093767/b093767.txt">Table of n, a(n) for n = 0..10000</a>
%H Eric Weisstein's World of Mathematics, <a href="http://mathworld.wolfram.com/SmoothedOctagon.html">Smoothed Octagon</a>
%H <a href="/index/Tra#transcendental">Index entries for transcendental numbers</a>
%e 0.90241418299715727039646130311253337316823442456643...
%t RealDigits[(8-4Sqrt[2 ]-Log[2])/(2Sqrt[2]-1),10,120][[1]] (* _Harvey P. Dale_, Nov 30 2012 *)
%o (PARI) (8-log(2)-sqrt(32))/(sqrt(8)-1) \\ _Charles R Greathouse IV_, Feb 22 2016
%o (Magma) SetDefaultRealField(RealField(100)); (8 -Log(2) -Sqrt(32) )/( Sqrt(8) -1); // _G. C. Greubel_, Oct 01 2018
%K nonn,cons,easy
%O 0,1
%A _Eric W. Weisstein_, Apr 15 2004
|
