%I #16 Jul 02 2023 21:18:28

%S 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 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 8,8,5,3,1,2,2,8,7,6

%N Decimal expansion of the number whose continued fraction expansion is A000001.

%H 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 1.577163370... = 1/(1+1/(1+1/(1+1/(2+... +1/(A000001(i)+...

%p Digits := 80 ; read("transforms3") ;

%p 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 FiniteGroupCount[Range[80]] // FromContinuedFraction // N[#, 80]& // RealDigits // First (* _Jean-François Alcover_, Apr 06 2020 *)

%Y Cf. A000001.

%K nonn,cons

%O 1,2

%A Schmieding-Forland (Kerranti(AT)gmail.com), Mar 02 2010

%E Keyword:cons added, more digits appended by _R. J. Mathar_, Mar 05 2010