|
|
A022863
|
|
a(n) = [ a(n-1)/a(1) + a(n-2)/a(2) + ... + a(1)/a(n-1) ], for n >= 3.
|
|
2
|
|
|
1, 2, 2, 3, 5, 8, 13, 21, 34, 55, 89, 144, 234, 379, 615, 998, 1619, 2627, 4263, 6918, 11226, 18217, 29561, 47970, 77844, 126321, 204988, 332645, 539801, 875964, 1421474, 2306702, 3743209, 6074307, 9857105, 15995654, 25957009, 42121835
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,2
|
|
LINKS
|
|
|
FORMULA
|
a(n) ~ c * d^n, where d = 1.62275381745856884115747797718538977396890203478399837508696442768520..., c = 0.43142665986772109399057405488003450887636739499705486305469410649365... . - Vaclav Kotesovec, Jun 24 2016
|
|
MATHEMATICA
|
a[1] = 1; a[2] = 2; a[3] = 2;
a[n_] := a[n] = Floor[Sum[a[n - k]/a[k], {k, 1, n - 1}]];
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|