OFFSET
0,2
COMMENTS
A floretion-generated sequence of squares.
Floretion Algebra Multiplication Program, FAMP Code: 1vescycseq[C*B] with C = - 'j + 'k - j' + k' - 'ii' - 'ij' - 'ik' - 'ji' - 'ki' B = - 'i + 'j - i' + j' - 'kk' - 'ik' - 'jk' - 'ki' - 'kj'
LINKS
G. C. Greubel, Table of n, a(n) for n = 0..870
Index entries for linear recurrences with constant coefficients, signature (15,-15,1).
FORMULA
From Colin Barker, May 06 2019: (Start)
a(n) = -13 + (7-4*sqrt(3))^n*(7+(3*sqrt(3))/2) + (7-(3*sqrt(3))/2)*(7+4*sqrt(3))^n.
a(n) = 15*a(n-1) - 15*a(n-2) + a(n-3) for n>2. (End)
MATHEMATICA
CoefficientList[Series[(1 + 34*x + 121*x^2)/((1 - x)*(x^2 - 14*x + 1)), {x, 0, 50}], x] (* G. C. Greubel, Oct 19 2017 *)
PROG
(PARI) x='x+O('x^50); Vec((1 +34*x +121*x^2)/((1-x)*(x^2 -14*x +1))) \\ G. C. Greubel, Oct 19 2017
CROSSREFS
KEYWORD
easy,nonn
AUTHOR
Creighton Dement, Sep 21 2005
STATUS
approved