|
|
A030040
|
|
a(n+1) = Sum_{k=0..floor(n/tau)} a(k) * a(n-k), where tau = (1+sqrt(5))/2.
|
|
0
|
|
|
1, 1, 1, 2, 3, 6, 13, 26, 57, 117, 262, 602, 1329, 3079, 7245, 16503, 38869, 89113, 210974, 504309, 1179630, 2824021, 6635307, 15941802, 38557737, 91823353, 222366338, 541354461, 1299734664, 3164349333, 7610216362, 18557153445, 45434487823, 110039888736
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
0,4
|
|
LINKS
|
|
|
PROG
|
(PARI) lista(nn) = {my(v=vector(nn+2, i, 1)); for(n=1, nn, v[n+2]=sum(k=1, 1+n\((1+sqrt(5))/2), v[k]*v[n+2-k])); v; } \\ Jinyuan Wang, Mar 18 2020
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|