login
A126337
a(n) = number of terms in the n-th row of the irregular table A126336.
1
1, 1, 1, 2, 2, 2, 3, 5, 4, 17, 11, 12, 13, 10, 10, 6, 14, 22, 23, 32, 28, 33, 29, 36, 45, 39, 41, 40, 43, 57, 76, 64, 77, 64, 85, 76, 117, 90, 104, 100, 95, 124, 118, 101, 137, 141, 151, 131, 157, 152, 143, 176, 168, 180, 182, 215, 220, 202, 221, 212, 257, 238, 239, 259
OFFSET
1,4
MATHEMATICA
f[l_List] := Append[l, ContinuedFraction[Plus @@ (1/# &) /@ Flatten[l]]]Length /@ Nest[f, {{1}}, 64] (* Ray Chandler, Dec 29 2006 *)
CROSSREFS
KEYWORD
nonn
AUTHOR
Leroy Quet, Dec 25 2006
EXTENSIONS
Extended by Ray Chandler, Dec 26 2006
STATUS
approved