%I A064441
%S A064441 1,2,7,11,124,146,205,1121,2101,3333,20899,45415,54103,67629,148987,
%T A064441 319183,757657
%N A064441 Increasing partial quotients of e^Pi - Pi^e (A063504).
%t A064441 t1 = ContinuedFraction[ N[ E^Pi - Pi^E, 9.8 10^5], 952040]; a = 0; Do[ 
               If[ t1[[n]] > a, a = t1[[n]]; Print[a]], {n, 1, 952040} ]
%Y A064441 Sequence in context: A002780 A069885 A069748 this_sequence A110949 A126343 
               A049409
%Y A064441 Adjacent sequences: A064438 A064439 A064440 this_sequence A064442 A064443 
               A064444
%K A064441 cofr,nonn
%O A064441 1,2
%A A064441 Robert G. Wilson v (rgwv(AT)rgwv.com), Oct 01 2001