|
|
A191501
|
|
Expansion of 2-sqrt(1-4*x-4*x^2-4*x^3)
|
|
0
|
|
|
1, 2, 4, 10, 28, 96, 354, 1372, 5512, 22740, 95768, 410016, 1779210, 7807724, 34589432, 154488460, 694883528, 3144917888, 14311109396, 65439770904, 300534169744, 1385612474536, 6410981989808, 29757955549888, 138534010818650, 646663905140300
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
0,2
|
|
LINKS
|
|
|
FORMULA
|
a(n)=2*sum(k=1..n, (binomial(2*k-2,k-1) * sum(j=0..k, binomial(j,n-3*k+2*j) * binomial(k,j) ) )/k ), n>0, a(0)=1.
D-finite with recurrence: n*a(n) +2*(-2*n+3)*a(n-1) +4*(-n+3)*a(n-2) +2*(-2*n+9)*a(n-3)=0. - R. J. Mathar, Jan 25 2020
|
|
PROG
|
(Maxima)
a(n):=2*sum((binomial(2*k-2, k-1)*sum(binomial(j, n-3*k+2*j)*binomial(k, j), j, 0, k))/k, k, 1, n);
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|