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

1, 9, 11, 15, 25, 27, 36, 173, 202, 1965, 10312, 13538, 31564, 39844, 88358, 90936, 171767, 798975, 1350952, 1934096, 4998490, 6950469, 16097930, 30366857, 201980012, 280003359, 726993911, 6157450525, 25921409405, 26415716358

Offset

1,2

Comments

Shgz(8) = 1.1219134834160251891529193531149802991...

Links

Table of n, a(n) for n=1..30.

Mathematica

ToEngel[ x_, n_Integer ] := Rest@First@Transpose@NestList[ {Ceiling[ 1/# ], #}&[ Times@@#-1 ]&, {1, Abs[ x ]+1}, n ]

Crossrefs

Cf. A006784 for definition of Engel expansion.

Sequence in context: A037009 A163096 A027694 * A329167 A216976 A236390

Adjacent sequences: A063188 A063189 A063190 * A063192 A063193 A063194

Keyword

nonn,easy

Author

Olivier Gérard, Jul 10 2001

Status

approved