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

1, 5, 7, 12, 800, 1502, 3021, 5079, 6325, 17537, 50021, 158855, 826545, 5023575, 5097327, 6369490, 17535161, 19462254, 22535278, 24898987, 55666978, 111142756, 305716101, 2653533055, 3591521863, 4889613852, 10577043282

Offset

1,2

Comments

Shgz(4) = 1.2309553591249981798150126937918121309...

Links

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

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: A011984 A280291 A195557 * A335164 A205323 A105054

Adjacent sequences: A063184 A063185 A063186 * A063188 A063189 A063190

Keyword

nonn,easy

Author

Olivier Gérard, Jul 10 2001

Status

approved