|
Search: id:A063194
|
|
|
| A063194 |
|
Engel expansion of 1 + sum( 1/k^k, {k,1,Infinity}). |
|
+0
1
|
|
| 1, 1, 4, 7, 7, 11, 80, 114, 6099, 11431, 26617, 33585, 56088, 61344, 194790, 234794, 1389968, 1786243, 2418760, 2647328, 3746318, 4952495, 5249786, 5341636, 10517386, 55449405, 79637649, 561022295, 625320951, 3650616781
(list; graph; listen)
|
|
|
OFFSET
|
1,3
|
|
|
COMMENT
|
Shgz(0)=2.2912859970626635404072825905956005414...
|
|
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: A088744 A061891 A168074 this_sequence A071529 A154922 A060409
Adjacent sequences: A063191 A063192 A063193 this_sequence A063195 A063196 A063197
|
|
KEYWORD
|
nonn,easy
|
|
AUTHOR
|
Olivier Gerard (olivier.gerard(AT)gmail.com), Jul 10 2001.
|
|
|
Search completed in 0.002 seconds
|
