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

1, 7, 9, 13, 132, 259, 756, 995, 1217, 1790, 3809, 6320, 17298, 63963, 266138, 821069, 3300319, 4218118, 4403814, 7172972, 20058471, 92458049, 191069103, 765926110, 822857354, 2489215358, 2980617344, 5257976545, 5926840761, 11328877119, 45478158116, 66167647170

Offset

1,2

Comments

Shgz(6) = 1.1599604457220200725212487379412204309...

Links

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

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: A332103 A160777 A365986 * A004472 A145827 A116025

Adjacent sequences: A063186 A063187 A063188 * A063190 A063191 A063192

Keyword

nonn,easy

Author

Olivier Gérard, Jul 10 2001

Status

approved