|
| |
|
|
A111388
|
|
a(n) = floor(ln(A111288(n))).
|
|
2
| |
|
|
0, 0, 0, 0, 0, 1, 1, 2, 3, 5, 8, 12, 17, 26, 38, 56, 82, 120, 176, 258, 379, 556, 815, 1194, 1751, 2566, 3761, 5512, 8079, 11840, 17353, 25432, 37272, 54625, 80057, 117330, 171955, 252013, 369343, 541298, 793311, 1162654, 1703953, 2497265, 3659920
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 1,8
|
|
|
COMMENTS
| The sequence A111288 grows very rapidly, as evidenced here, so it makes more sense to take the log of these terms.
|
|
|
MATHEMATICA
| l = {1, 1, 1, 1}; For[n = 5, n <= 50, n++, k = l[[n-1]]*l[[n-3]] + l[[n-2]]*l[[n-4]]; AppendTo[l, k]]; Print[Map[Floor, Map[Log, l]]]
|
|
|
CROSSREFS
| Sequence in context: A024789 A200661 A175539 * A127884 A105858 A039899
Adjacent sequences: A111385 A111386 A111387 * A111389 A111390 A111391
|
|
|
KEYWORD
| nonn
|
|
|
AUTHOR
| Ryan Propper (rpropper(AT)stanford.edu), Nov 09 2005
|
| |
|
|
