OFFSET
0,4
LINKS
Eduardo H. M. Brietzke, Generalization of an identity of Andrews, Fibonacci Quart. 44 (2006), no. 2, 166-171.
FORMULA
G.f.: (1+y)/(1-x*(1+y)^2). - Vladimir Kruchinin, Nov 22 2020
MATHEMATICA
Take[Table[Binomial[n, m], {n, 0, 20}, {m, 0, n}], {2, -1, 2}]//Flatten (* Harvey P. Dale, Dec 10 2018 *)
PROG
(Haskell)
a034871 n = a034871_list !! n
a034871_list = concat $ map ([1, 1] ^) [1, 3..]
instance Num a => Num [a] where
fromInteger k = [fromInteger k]
(p:ps) + (q:qs) = p + q : ps + qs
ps + qs = ps ++ qs
(p:ps) * qs'@(q:qs) = p * q : ps * qs' + [p] * qs
_ * _ = []
-- Reinhard Zumkeller, Apr 02 2011
CROSSREFS
KEYWORD
nonn,tabf,easy
AUTHOR
STATUS
approved