login

Reminder: The OEIS is hiring a new managing editor, and the application deadline is January 26.

Engel expansion of Sum_{k>=0} 1/(2 + k)^k.
0

%I #8 Jan 02 2022 20:24:45

%S 1,3,5,15,20,124,141,1085,1221,5267,9814,9899,179888,531293,43914936,

%T 59108249,129482155,290253117,297264974,329981693,515700524,

%U 1791622856,29237782307,289017844013,2187297805011,20282473409970

%N Engel expansion of Sum_{k>=0} 1/(2 + k)^k.

%C Shgz(2) = 1.4046684715031192197179531135647252212...

%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