OFFSET
0,2
LINKS
Index entries for linear recurrences with constant coefficients, signature (-5, 0, 6).
FORMULA
G.f. (1+2*x)/((x-1)*(6*x^2+6*x+1))
a(n)=(9-3*Sqrt[3]+(-3-Sqrt[3])^n*(-4+Sqrt[3])+(-3+Sqrt[3])^n*(-5+2*Sqrt[3]))/(13*(-3+Sqrt[3])) [From Harvey P. Dale, Mar 28 2012]
MAPLE
seriestolist(series((1+2*x)/((x-1)*(6*x^2+6*x+1)), x=0, 25)); -or- Floretion Algebra Multiplication Program, FAMP Code: 1kbasesumseq[A*B] with A = + 'i + 'ii' + 'ij' + 'ik' and B = + .5'i - .5'j + .5'k + .5i' + .5j' - .5k' - .5'ij' - .5'ik' + .5'ji' + .5'ki' Sumtype is set to: sum[(Y[0], Y[1], Y[2]), mod(3)
MATHEMATICA
LinearRecurrence[{-5, 0, 6}, {-1, 3, -15}, 30] (* Harvey P. Dale, Mar 28 2012 *)
CROSSREFS
KEYWORD
easy,sign
AUTHOR
Creighton Dement, Jul 16 2005
STATUS
approved