|
| |
|
|
A063191
|
|
Engel expansion of sum( 1/(8+k)^k, {k,0,Infinity}).
|
|
0
| |
|
|
1, 9, 11, 15, 25, 27, 36, 173, 202, 1965, 10312, 13538, 31564, 39844, 88358, 90936, 171767, 798975, 1350952, 1934096, 4998490, 6950469, 16097930, 30366857, 201980012, 280003359, 726993911, 6157450525, 25921409405, 26415716358
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 1,2
|
|
|
COMMENTS
| Shgz(8)=1.1219134834160251891529193531149802991...
|
|
|
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: A037009 A163096 A027694 * A048464 A075824 A108113
Adjacent sequences: A063188 A063189 A063190 * A063192 A063193 A063194
|
|
|
KEYWORD
| nonn,easy
|
|
|
AUTHOR
| Olivier Gerard (olivier.gerard(AT)gmail.com), Jul 10 2001.
|
| |
|
|
