login
A126339
a(n) = denominator of sum of the reciprocals of all terms in rows 1 through n of table A126336.
4
1, 1, 2, 2, 3, 12, 66, 462, 42504, 127512, 637560, 8288280, 125580, 2415, 103845, 75599160, 17028710790, 2156970033400, 213540033306600, 26692504163325, 106770016653300, 52103768126810400, 52103768126810400
OFFSET
1,3
LINKS
MATHEMATICA
f[l_List] := Append[l, ContinuedFraction[Plus @@ (1/# &) /@ Flatten[l]]]; Denominator@ Table[Plus @@ (1/# &) /@ Flatten@ Nest[f, {{1}}, n - 1], {n, 24}] (* Ray Chandler, Dec 26 2006 *)
CROSSREFS
Sequence in context: A335942 A240133 A293445 * A268725 A153929 A184843
KEYWORD
frac,nonn
AUTHOR
Leroy Quet, Dec 25 2006
EXTENSIONS
Extended by Ray Chandler, Dec 26 2006
STATUS
approved