OFFSET
0,3
LINKS
Vincenzo Librandi, Table of n, a(n) for n = 0..200
PROG
(PARI) a(n)=polcoeff((1+x+x^3)^n, n\2);
(Maxima) makelist((coeff(expand((1+x+x^3)^n), x, floor(n/2))), n, 0, 34); /* Bruno Berselli, Jul 01 2011 */
(Magma) P<x>:=PolynomialRing(Integers()); [ Coefficients((1+x+x^3)^n)[Floor(n/2)+1 ]: n in [0..34] ]; // Bruno Berselli, Jul 01 2011
CROSSREFS
KEYWORD
nonn
AUTHOR
Joerg Arndt, Jul 01 2011
STATUS
approved