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

1, 4, 6, 13, 16, 31, 131, 231, 578, 905, 1649, 4810, 5999, 10249, 11962, 21338, 229345, 404066, 772217, 1646462, 2129025, 235494066, 559730937, 1287457726, 1549953698, 2919657850, 23892156516, 52085560558, 70347157214

Offset

1,2

Comments

Shgz(3) = 1.2950786268784303709733480860835436581...

Links

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

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: A266665 A249715 A249440 * A345984 A191198 A191137

Adjacent sequences: A063183 A063184 A063185 * A063187 A063188 A063189

Keyword

nonn,easy,nice

Author

Olivier Gérard, Jul 10 2001

Status

approved