%I A063193
%S A063193 1,11,13,17,19,22,39,46,95,100,202,716,1008,1347,3544,4174,27864,51834,
%T A063193 81170,115510,172502,1297395,1428481,3429593,8484143,16796993,35875141,
%U A063193 202879810,560789726,953079326,1456311045,2218799342
%N A063193 Engel expansion of sum( 1/(10+k)^k, {k,0,Infinity}).
%C A063193 Shgz(10)=1.0983361113176944131706689076969241474...
%t A063193 ToEngel[ x_, n_Integer ] := Rest@First@Transpose@NestList[ {Ceiling[ 
               1/# ], #}&[ Times@@#-1 ]&, {1, Abs[ x ]+1}, n ]
%Y A063193 Cf. A006784 for definition of Engel expansion.
%Y A063193 Sequence in context: A048388 A068191 A084374 this_sequence A056758 A096489 
               A008364
%Y A063193 Adjacent sequences: A063190 A063191 A063192 this_sequence A063194 A063195 
               A063196
%K A063193 nonn,easy
%O A063193 1,2
%A A063193 Olivier Gerard (olivier.gerard(AT)gmail.com), Jul 10 2001.