%I #2 Sep 29 2006 03:00:00
%S 0,1,1,2,1,1,8,2,9,1,1,1,1,1,13,2,13,1,1,6,1,2,1,6,4,1,1,11,6,1,3,1,
%T 16,5,132,4,7,1,1,2,1,3,2,18,17,1,2,1,22,3,1,1,1,2,1,1,1,2,3,2,27,1,3,
%U 6,1,1,2,3,6,1,2,1,2,3,1,1,1,2,1,1
%N Continued fraction expansion of the real part of (-Exp[ -1])^(-Exp[ -1]).
%C (-Exp[ -1])^(-Exp[ -1]) is the value of z^z where Abs[z^z] achieves its unique local maximum. A119419 gives the continued fraction expansion of the corresponding imaginary part. A119420 gives the decimal expansion. A119421 gives the decimal expansion of the corresponding imaginary part.
%t ContinuedFraction[Re[(-Exp[ -1])^(-Exp[ -1])], 80]
%Y Cf. A119419, A119420, A119421.
%K cofr,nonn
%O 0,4
%A Joseph Biberstine (jrbibers(AT)indiana.edu), May 17 2006
|