|
|
A030038
|
|
a(n+1) = Sum_{k=0..floor(3*n/5)} a(k) * a(n-k).
|
|
5
|
|
|
1, 1, 1, 2, 3, 6, 13, 26, 57, 117, 262, 602, 1329, 3079, 6903, 16161, 38185, 87745, 207896, 481817, 1148246, 2755781, 6485489, 15592656, 36899080, 88966356, 215687474, 515590781, 1251629165, 2998835401, 7291353036, 17803231663, 42980538045, 104981503048, 253813177447
(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+(3*n)\5, v[k]*v[n+2-k])); v; } \\ Jinyuan Wang, Mar 18 2020
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|