%I A063194
%S A063194 1,1,4,7,7,11,80,114,6099,11431,26617,33585,56088,61344,194790,234794,
%T A063194 1389968,1786243,2418760,2647328,3746318,4952495,5249786,5341636,
%U A063194 10517386,55449405,79637649,561022295,625320951,3650616781
%N A063194 Engel expansion of 1 + sum( 1/k^k, {k,1,Infinity}).
%C A063194 Shgz(0)=2.2912859970626635404072825905956005414...
%t A063194 ToEngel[ x_, n_Integer ] := Rest@First@Transpose@NestList[ {Ceiling[ 
               1/# ], #}&[ Times@@#-1 ]&, {1, Abs[ x ]+1}, n ]
%Y A063194 Cf. A006784 for definition of Engel expansion.
%Y A063194 Sequence in context: A131432 A088744 A061891 this_sequence A071529 A154922 
               A060409
%Y A063194 Adjacent sequences: A063191 A063192 A063193 this_sequence A063195 A063196 
               A063197
%K A063194 nonn,easy
%O A063194 1,3
%A A063194 Olivier Gerard (olivier.gerard(AT)gmail.com), Jul 10 2001.