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 A099803 #13 Aug 04 2024 17:03:31
%S A099803 1,2,4,1,1,1,3,1,1,1,2,47,2,4,1,12,1,1,2,2,1,7,2,1,1,1,2,30,6,3,6,1,6,
%T A099803 1,3,1,1,1,1,10,1,1,2,2,1,4,2,5,26,5,1,19,2,6,1,10,28,1,2,1,10,2,1,1,
%U A099803 11,1,4,19,16,99,1,1,1,35,1,1,3,2,3,1,3,2,1,1,1,1,1,1,11,3,2,1,6,5,1
%N A099803 Continued fraction for Soldner's constant.
%H A099803 Eric Weisstein's World of Mathematics, <a href="https://mathworld.wolfram.com/SoldnersConstant.html">Soldner's Constant</a>.
%e A099803 [1, 2, 4, 1, 1, 1, 3, 1, 1, 1, 2, 47, 2, 4, 1, ...]
%t A099803 ContinuedFraction[x/.FindRoot[LogIntegral[x]==0,{x,1.4}, WorkingPrecision-> 120]] (* _Harvey P. Dale_, May 01 2012 *)
%Y A099803 Cf. A070769 (decimal expansion), A099804 (records).
%K A099803 nonn,cofr
%O A099803 0,2
%A A099803 _Eric W. Weisstein_, Oct 26 2004
%E A099803 Offset changed by _Andrew Howroyd_, Aug 04 2024