Location via proxy:   [ UP ]  
[Report a bug]   [Manage cookies]                
A063193
Engel expansion of Sum_{k>=0} 1/(10 + k)^k.
0
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...
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: A068191 A191599 A084374 * A056758 A322273 A096489
KEYWORD
nonn,easy
AUTHOR
Olivier Gérard, Jul 10 2001
STATUS
approved