login
Continued fraction for Gamma(1/3).
3

%I #22 Aug 03 2024 13:25:31

%S 2,1,2,8,1,2,1,1,2,1,1,3,1,1,9,1,4,1,3,1,7,1,1,3,6,2,2,1,1,32,3,3,3,1,

%T 24,2,2,25,1,2,1,6,2,1,1,3,1,9,3,2,1,6,7,2,8,2,5,1,5,1,2,2,2,2,4,3,1,

%U 5,1,15,1,1,2,4,3,3,1,5,1,4,1,8,1,3,1,1,8,2,1,2,1,514,1,2,1,1,1

%N Continued fraction for Gamma(1/3).

%H Harry J. Smith, <a href="/A030651/b030651.txt">Table of n, a(n) for n = 0..999</a>

%H Gang Xiao, <a href="http://wims.unice.fr/~wims/en_tool~number~contfrac.en.html">Contfrac</a>

%H <a href="/index/Con#confC">Index entries for continued fractions for constants</a>

%F Note that 3 * Gamma(1/3) * Gamma(2/3) = 2 * Pi * sqrt(3).

%e Gamma(1/3) = 2.67893853470774... = 2 + 1/(1 + 1/(2 + 1/(8 + 1/(1 + ...)))). - _Harry J. Smith_, Apr 20 2009

%t ContinuedFraction[Gamma[1/3], 50] (* _Alonso del Arte_, Mar 30 2020 *)

%o (PARI) { default(realprecision, 1080); x=contfrac(gamma(1/3)); for (n=1, 1000, write("b030651.txt", n-1, " ", x[n])); } \\ _Harry J. Smith_, Apr 20 2009

%Y Cf. A030652, A073005 (decimal expansion).

%K nonn,cofr

%O 0,1

%A Paolo Dominici (pl.dm(AT)libero.it)

%E Offset changed by _Andrew Howroyd_, Aug 03 2024