OFFSET
0,2
LINKS
G. C. Greubel, Table of n, a(n) for n = 0..1000
Philippe Flajolet and Robert Sedgewick, Analytic Combinatorics, Cambridge Univ. Press, 2009, page 303.
Index entries for linear recurrences with constant coefficients, signature (1,1,2,-2,-4,3,-3,3).
FORMULA
MATHEMATICA
p[t_]= 1/((1-t)*(1-t^2-t^4)) + t/(1-3*t^3);
CoefficientList[ Series[p[t], {t, 0, 60}], t]
PROG
(Magma)
R<x>:=PowerSeriesRing(Integers(), 60);
Coefficients(R!( 1/((1-x)*(1-x^2-x^4)) +x/(1-3*x^3) )); // G. C. Greubel, Oct 23 2024
(SageMath)
def A169592_list(prec):
P.<x> = PowerSeriesRing(ZZ, prec)
return P( 1/((1-x)*(1-x^2-x^4)) +x/(1-3*x^3) ).list()
A169592_list(60) # G. C. Greubel, Oct 23 2024
CROSSREFS
KEYWORD
nonn,easy
AUTHOR
Roger L. Bagula, Dec 02 2009
EXTENSIONS
Notation adapted to OEIS standards, sequence extended, formulas added by the Assoc. Editors of the OEIS [Dec 05 2009]
STATUS
approved