%I A114594
%S A114594 5,1,9,7,2,0,4,6,5,5,5,1,7,0,5,1,0,1,6,0,7,4,5,2,6,0,0,6,7,3,3,2,8,5,3,
%T A114594 5,9,6,8,3,9,2,2,0,1,4,0,7,3,8,2,1,4,7,7,4,0,3,2,0,3,8,9,2,4,6,9,7,9,1,
%U A114594 6,4,4,5,3,4,5,4,9,9,5,0,4,3,1,2,9,2,2,0,8,3,9,1,3,0,3,1,0,0
%N A114594 Decimal expansion of (e^Pi)*(Pi^e).
%e A114594 (e^Pi)*(Pi^e) is 519.7204655517051016...
%t A114594 a := N[E^Pi*Pi^E, 500]; Table[Floor[10^(n - 3)*a] - 10*Floor[10^(n - 
               4)*a], {n, 1, 100}] (valid for the first 500 digits).
%Y A114594 Cf. A019314 [sum of E^Pi and Pi^e].
%Y A114594 Sequence in context: A135856 A097414 A154605 this_sequence A021662 A082020 
               A147406
%Y A114594 Adjacent sequences: A114591 A114592 A114593 this_sequence A114595 A114596 
               A114597
%K A114594 cons,nonn
%O A114594 3,1
%A A114594 Stefan Steinerberger (stefan.steinerberger(AT)gmail.com), Feb 21 2006