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 A173930 #16 Jul 02 2023 21:18:28
%S A173930 1,5,7,7,1,6,3,3,7,0,3,4,3,2,2,1,3,4,9,8,6,1,0,8,9,3,4,5,9,6,8,8,0,8,
%T A173930 6,0,4,8,0,1,2,0,8,6,1,4,2,9,0,5,4,3,0,3,4,9,0,8,9,3,4,5,0,2,0,0,0,9,
%U A173930 8,8,5,3,1,2,2,8,7,6
%N A173930 Decimal expansion of the number whose continued fraction expansion is A000001.
%H A173930 Charles R Greathouse IV, <a href="/A173930/b173930.txt">Table of n, a(n) for n = 1..2500</a> (first 400 terms from Muniru A Asiru)
%e A173930 1.577163370... = 1/(1+1/(1+1/(1+1/(2+... +1/(A000001(i)+...
%p A173930 Digits := 80 ; read("transforms3") ;
%p A173930 L := BFILETOLIST("b000001.txt") ; for n from 80 to 200 do x := numtheory[nthconver](L,n) ; x := evalf(x) ; print(x) ; end do : # _R. J. Mathar_, Mar 05 2010
%t A173930 FiniteGroupCount[Range[80]] // FromContinuedFraction // N[#, 80]& // RealDigits // First (* _Jean-François Alcover_, Apr 06 2020 *)
%Y A173930 Cf. A000001.
%K A173930 nonn,cons
%O A173930 1,2
%A A173930 Schmieding-Forland (Kerranti(AT)gmail.com), Mar 02 2010
%E A173930 Keyword:cons added, more digits appended by _R. J. Mathar_, Mar 05 2010