login
The OEIS Foundation is supported by donations from users of the OEIS and by a grant from the Simons Foundation.

 

Logo


Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A107375 a(n) = 6*a(n-1)-6*a(n-3)-a(n-4). 0
0, 1, 1, 2, 6, 29, 161, 928, 5388, 31333, 182269, 1060358, 6168762, 35887625, 208781333, 1214615068, 7066195896, 41108599753, 239155126777, 1391318970218, 8094196026894, 47089136800949, 273947751857609, 1593730016014072 (list; graph; refs; listen; history; text; internal format)
OFFSET

0,4

LINKS

Table of n, a(n) for n=0..23.

Index entries for linear recurrences with constant coefficients, signature (6,0,-6,-1).

FORMULA

G.f.: x*(1-5*x-4*x^2)/(1-6*x+6*x^3+x^4). [Sep 28 2009]

MATHEMATICA

m = 6 M = {{0, 1, 0, 0}, {0, 0, 1, 0}, {0, 0, 0, 1}, {-1, -m, 0, m}} Expand[Det[M - x*IdentityMatrix[4]]] NSolve[Det[M - x*IdentityMatrix[4]] == 0, x] v[1] = {0, 1, 1, 2}; v[n_] := v[n] = M.v[n - 1]; digits = 50; a = Table[v[n][[1]], {n, 1, digits}]

LinearRecurrence[{6, 0, -6, -1}, {0, 1, 1, 2}, 30] (* Harvey P. Dale, Nov 28 2018 *)

CROSSREFS

Sequence in context: A136639 A284594 A027109 * A302863 A020126 A124529

Adjacent sequences:  A107372 A107373 A107374 * A107376 A107377 A107378

KEYWORD

nonn,easy

AUTHOR

Roger L. Bagula, May 24 2005

EXTENSIONS

Definition replaced by recurrence by the Associate Editors of the OEIS, Sep 28 2009

STATUS

approved

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recent
The OEIS Community | Maintained by The OEIS Foundation Inc.

License Agreements, Terms of Use, Privacy Policy. .

Last modified August 1 18:37 EDT 2021. Contains 346402 sequences. (Running on oeis4.)