This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.
%I A193505 #24 Feb 16 2025 08:33:15
%S A193505 1,0,5,8,0,4,9,6,2,9,1,3,6,6,2,7,0,7,9,5,1,3,2,1,2,3,1,6,9,5,7,9,2,4,
%T A193505 1,7,7,1,6,5,7,0,5,3,1,1,3,8,7,4,3,2,0,0,2,4,1,5,7,6,6,2,1,2,3,0,9,7,
%U A193505 3,8,5,2,2,3,2,3,7,0,6,4,3,2,1,4,9,0,7,2,9,0,9,7,9,0,3,6,8,4,3,1,8,3,2,7,9
%N A193505 Decimal expansion of bean curve area.
%C A193505 area = 7*Pi/(12*sqrt(3)). - _Eric W. Weisstein_, Feb 05 2018
%H A193505 Eric Weisstein's World of Mathematics, <a href="https://mathworld.wolfram.com/BeanCurve.html">Bean Curve</a>
%e A193505 1.058049629...
%t A193505 area = Sqrt[2] NIntegrate[Sqrt[x (1 - x + Sqrt[1 + (2 - 3 x) x])], {x, 0, 1}, WorkingPrecision -> 120]; Take[RealDigits[area][[1]], 105]
%t A193505 RealDigits[7 Pi/(12 Sqrt[3]), 10, 105][[1]] (* _Eric W. Weisstein_, Feb 05 2018 *)
%Y A193505 Cf. A193306 (arc length).
%K A193505 nonn,cons,easy
%O A193505 1,3
%A A193505 _Jean-François Alcover_, Jul 29 2011