|
Search: id:A126338
|
|
|
| A126338 |
|
a(n) = numerator of sum of the reciprocals of all terms in rows 1 through n of table A126336. |
|
+0
4
|
|
| 1, 2, 5, 7, 13, 59, 413, 3881, 405331, 2845313, 17135191, 274111423, 4924469, 105188, 5188129, 3877908109, 984131084791, 152077180227073, 17159732095214477, 2637696371523184, 12185515744595363
(list; graph; listen)
|
|
|
OFFSET
|
1,2
|
|
|
LINKS
|
Leroy Quet, Home Page (listed in lieu of email address)
|
|
MATHEMATICA
|
f[l_List] := Append[l, ContinuedFraction[Plus @@ (1/# &) /@ Flatten[l]]]; Numerator@Table[Plus @@ (1/# &) /@ Flatten@Nest[f, {{1}}, n - 1], {n, 22}] (*Chandler*)
|
|
CROSSREFS
|
Cf. A126336, A126339.
Sequence in context: A053647 A023242 A164570 this_sequence A007438 A031457 A044990
Adjacent sequences: A126335 A126336 A126337 this_sequence A126339 A126340 A126341
|
|
KEYWORD
|
frac,nonn
|
|
AUTHOR
|
Leroy Quet Dec 25 2006
|
|
EXTENSIONS
|
Extended by Ray Chandler (rayjchandler(AT)sbcglobal.net), Dec 26 2006
|
|
|
Search completed in 0.002 seconds
|
