OFFSET
0,7
COMMENTS
Number of compositions (ordered partitions) of n into elements of the set {2,5,6}.
REFERENCES
D. H. Lehmer, Permutations with strongly restricted displacements. Combinatorial theory and its applications, II (Proc. Colloq., Balatonfured, 1969), pp. 755-770. North-Holland, Amsterdam, 1970.
LINKS
G. C. Greubel, Table of n, a(n) for n = 0..1000
Vladimir Baltic, On the number of certain types of strongly restricted permutations, Applicable Analysis and Discrete Mathematics Vol. 4, No 1 (2010), 119-135
Index entries for linear recurrences with constant coefficients, signature (0,1,0,0,1,1).
FORMULA
a(n) = a(n-2) + a(n-5) + a(n-6).
G.f.: 1/(1 - x^2 - x^5 - x^6).
MAPLE
seq(coeff(series(1/(1-x^2-x^5-x^6), x, n+1), x, n), n = 0..50); # G. C. Greubel, Dec 11 2019
MATHEMATICA
LinearRecurrence[{0, 1, 0, 0, 1, 1}, {1, 0, 1, 0, 1, 1}, 51] (* Jean-François Alcover, Dec 11 2019 *)
PROG
(PARI) a(n) = ([0, 1, 0, 0, 0, 0; 0, 0, 1, 0, 0, 0; 0, 0, 0, 1, 0, 0; 0, 0, 0, 0, 1, 0; 0, 0, 0, 0, 0, 1; 1, 1, 0, 0, 1, 0]^n*[1; 0; 1; 0; 1; 1])[1, 1] \\ Charles R Greathouse IV, Jul 28 2015
(Magma) R<x>:=PowerSeriesRing(Integers(), 50); Coefficients(R!( 1/(1-x^2-x^5-x^6) )); // G. C. Greubel, Dec 11 2019
(Sage)
def A079955_list(prec):
P.<x> = PowerSeriesRing(ZZ, prec)
return P( 1/(1-x^2-x^5-x^6) ).list()
A079955_list(50) # G. C. Greubel, Dec 11 2019
CROSSREFS
KEYWORD
nonn,easy
AUTHOR
Vladimir Baltic, Feb 19 2003
STATUS
approved