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

1, 8, 10, 14, 36, 45, 88, 102, 114, 432, 4369, 9183, 15670, 31307, 103514, 511249, 1673274, 2394998, 3225410, 4732293, 54612351, 55335052, 220482735, 39208626697, 290846809341, 296349507792, 2280942643369, 2891972596111

Offset

1,2

Comments

Shgz(7) = 1.1384182162015123957749881105729298508...

Links

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

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: A250290 A228946 A100718 * A101763 A154568 A020940

Adjacent sequences: A063187 A063188 A063189 * A063191 A063192 A063193

Keyword

nonn,easy

Author

Olivier Gérard, Jul 10 2001

Status

approved