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

 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 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.

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