|
Search: id:A063187
|
|
|
| A063187 |
|
Engel Expansion of sum( 1/(4+k)^k, {k,0,Infinity}). |
|
+0
1
|
|
| 1, 5, 7, 12, 800, 1502, 3021, 5079, 6325, 17537, 50021, 158855, 826545, 5023575, 5097327, 6369490, 17535161, 19462254, 22535278, 24898987, 55666978, 111142756, 305716101, 2653533055, 3591521863, 4889613852, 10577043282
(list; graph; listen)
|
|
|
OFFSET
|
1,2
|
|
|
COMMENT
|
Shgz(4)=1.2309553591249981798150126937918121309...
|
|
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: A031144 A020686 A011984 this_sequence A105054 A088897 A074755
Adjacent sequences: A063184 A063185 A063186 this_sequence A063188 A063189 A063190
|
|
KEYWORD
|
nonn,easy
|
|
AUTHOR
|
Olivier Gerard (ogerard(AT)ext.jussieu.fr), Jul 10 2001.
|
|
|
Search completed in 0.002 seconds
|
