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

1, 11, 13, 17, 19, 22, 39, 46, 95, 100, 202, 716, 1008, 1347, 3544, 4174, 27864, 51834, 81170, 115510, 172502, 1297395, 1428481, 3429593, 8484143, 16796993, 35875141, 202879810, 560789726, 953079326, 1456311045, 2218799342

Offset

1,2

Comments

Shgz(10) = 1.0983361113176944131706689076969241474...

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: A376740 A191599 A084374 * A056758 A322273 A096489

Adjacent sequences: A063190 A063191 A063192 * A063194 A063195 A063196

Keyword

nonn,easy

Author

Olivier Gérard, Jul 10 2001

Status

approved