%I A118307
%S A118307 7,1,5,5,5,4,7,2,4,1,5,2,9,4,3,9,3,9,7,2,6,8,4,1,0,9,2,0,7,5,4,2,4,9,4,
%T A118307 0,8,8,0,6,1,3,1,0,5,3,9,1,2,3,5,9,3,2,9,2,2,3,8,8,4,8,4,8,9,3,0,5,9,6,
%U A118307 9,2,2,5,6,8,4,2,8,2,8,6,4,0,1,8,3,4,4,4,4,1,6,2,3,6,9,1,2,6,8,6,4,4,5
%N A118307 Decimal expansion of the arc length of the bifolium.
%H A118307 Eric Weisstein's World of Mathematics, <a href="http://mathworld.wolfram.com/
               Bifolium.html">Bifolium</a>
%e A118307 7.1555472415294393972...
%t A118307 RealDigits[4*Sqrt[2]*NIntegrate[Sqrt[3 + 3*Cos[2q] + 2*Cos[4q]]*Sin[q], 
               {q, 0, Pi/2}, WorkingPrecision -> 150],10,110][[1]]
%Y A118307 Sequence in context: A021587 A065479 A011478 this_sequence A047875 A064467 
               A089204
%Y A118307 Adjacent sequences: A118304 A118305 A118306 this_sequence A118308 A118309 
               A118310
%K A118307 nonn,cons
%O A118307 1,1
%A A118307 Eric Weisstein (eric(AT)weisstein.com), Apr 22, 2006