|
%I #10 Jan 02 2022 21:04:42
%S 1,7,9,13,132,259,756,995,1217,1790,3809,6320,17298,63963,266138,
%T 821069,3300319,4218118,4403814,7172972,20058471,92458049,191069103,
%U 765926110,822857354,2489215358,2980617344,5257976545,5926840761,11328877119,45478158116,66167647170
%N Engel expansion of Sum_{k>=0} 1/(6 + k)^k.
%C Shgz(6) = 1.1599604457220200725212487379412204309...
%t ToEngel[ x_, n_Integer ] := Rest@First@Transpose@NestList[ {Ceiling[ 1/# ], #}&[ Times@@#-1 ]&, {1, Abs[ x ]+1}, n ]
%Y Cf. A006784 for definition of Engel expansion.
%K nonn,easy
%O 1,2
%A _Olivier Gérard_, Jul 10 2001
|
