|
|
A030034
|
|
a(n+1) = Sum_{k=0..floor(n/4)} a(k) * a(n-k).
|
|
4
|
|
|
1, 1, 1, 1, 1, 2, 3, 5, 8, 16, 29, 53, 98, 196, 376, 723, 1393, 2786, 5474, 10752, 21128, 42979, 85905, 171810, 343522, 703270, 1421998, 2875847, 5817194, 11978061, 24428369, 49817625, 101588512, 209911975, 430722621, 883632025, 1812556425, 3763773324, 7764267706
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
0,6
|
|
LINKS
|
|
|
PROG
|
(PARI) lista(nn) = {my(v=vector(nn+2, i, 1)); for(n=3, nn, v[n+2]=sum(k=1, 1+n\4, v[k]*v[n+2-k])); v; } \\ Jinyuan Wang, Mar 18 2020
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|