OFFSET
1,2
LINKS
Vincenzo Librandi, Table of n, a(n) for n = 1..97
PROG
(Magma) PS<x>:=PowerSeriesRing(Integers()); { Max(Coefficients(&*[&+[ x^i: i in [0..j] ]: j in [0..n-1] ])): n in [1..25] } meet { Max(Coefficients(&*[&+[ (-x)^i: i in [0..j] ]: j in [0..n] ])): n in [1..24] }; // Klaus Brockhaus, Jan 18 2011
CROSSREFS
KEYWORD
nonn
AUTHOR
Paul Muljadi, Jan 13 2011
STATUS
approved