A064411 Increasing partial quotients of e^gamma.
1, 3, 5, 7, 9, 16, 59, 100, 129, 314, 2294, 1568705
Offset: 1
References
- Ronald L. Graham, D. E. Knuth and Oren Patashnik, "Concrete Mathematics, A Foundation for Computer Science," Addison-Wesley Publishing Co., Reading, MA, 1989, page 540.
Links
- Richard P. Brent, Computation of the regular continued fraction for Euler's constant, Mathematics of Computation 31 (1977), pages 771-777.
Programs
-
Mathematica
t1 = ContinuedFraction[ E^EulerGamma, 10^5 ]; a = 0; Do[ If[ t1[ [ n ] ] > a, a = t1[ [ n ] ]; Print[ a ] ], {n, 1, 10^5} ]