OFFSET
0,3
COMMENTS
This sequence is a companion sequence to A111954 (compare formula / program code). Three other companion sequences (i.e., they are generated by the same floretion given in the program code) are A105635, A097076 and A100828.
Floretion Algebra Multiplication Program, FAMP Code: 4kbasejseq[J*D] with J = - .25'i + .25'j + .5'k - .25i' + .25j' + .5k' - .5'kk' - .25'ik' - .25'jk' - .25'ki' - .25'kj' - .5e and D = + .5'i - .25'j + .25'k + .5i' - .25j' + .25k' - .5'ii' - .25'ij' - .25'ik' - .25'ji' - .25'ki' - .5e. (an initial term 0 was added to the sequence)
LINKS
FORMULA
a(n) + a(n+1) = A048655(n).
a(n) = a(n-1) + 3*a(n-2) + a(n-3), n >= 3; a(n) = (-1/4*sqrt(2)+1)*(1-sqrt(2))^n + (1/4*sqrt(2)+1)*(1+sqrt(2))^n - (-1)^n;
G.f.: -x*(1+3*x) / ( (1+x)*(x^2+2*x-1) ). - R. J. Mathar, Oct 02 2012
E.g.f.: cosh(x) - exp(x)*cosh(sqrt(2)*x) - sinh(x) + 3*exp(x)*sinh(sqrt(2)*x)/sqrt(2). - Stefano Spezia, May 26 2024
MATHEMATICA
LinearRecurrence[{1, 3, 1}, {0, 1, 4}, 40] (* Harvey P. Dale, Mar 12 2015 *)
CROSSREFS
KEYWORD
easy,nonn
AUTHOR
Creighton Dement, Aug 25 2005
STATUS
approved