OFFSET
0,3
LINKS
Alois P. Heinz, Table of n, a(n) for n = 0..1000
FORMULA
MAPLE
seq(combinat[fibonacci](n)*(binomial(2*n, n)/(n+1)), n=0..27);
# second Maple program:
a:= proc(n) option remember; `if`(n<2, n,
((2*n-1)*(2*n*a(n-1)+(8*n-12)*a(n-2)))/(n*(n+1)))
end:
seq(a(n), n=0..25); # _Alois P. Heinz_, Aug 12 2017
MATHEMATICA
Table[Fibonacci[n]CatalanNumber[n], {n, 0, 30}] (* _Harvey P. Dale_, Aug 27 2017 *)
CROSSREFS
KEYWORD
easy,nonn
AUTHOR
_Zerinvary Lajos_, Jun 09 2006
EXTENSIONS
Name edited by _Alois P. Heinz_, Aug 12 2017
STATUS
approved