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

1, 10, 12, 16, 21, 22, 33, 64, 64, 372, 7928, 10206, 18400, 319831, 429477, 588460, 849875, 859279, 2903676, 11021989, 14742559, 16613535, 48017191, 329292950, 3988366898, 5315516684, 19567917130, 21634744969, 23775894403

Offset: 1

Author

Olivier Gérard, Jul 10 2001

Keywords

• nonn
• easy

Comments

Shgz(9) = 1.1088801303029550442121544797829556538...

Crossrefs

Cf. A006784 for definition of Engel expansion.

Programs

Mathematica

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