login

Year-end appeal: Please make a donation to the OEIS Foundation to support ongoing development and maintenance of the OEIS. We are now in our 61st year, we have over 378,000 sequences, and we’ve reached 11,000 citations (which often say “discovered thanks to the OEIS”).

A104681
Expansion of (1-x-2*x^2-2*x^3-9*x^4-9*x^5-6*x^6+6*x^7-x^8-x^9-2*x^13+2*x^12) / (-x^12-1+2*x^6).
1
-1, 1, 2, 2, 9, 9, 4, -4, 5, 5, 18, 18, 7, -7, 8, 8, 27, 27, 10, -10, 11, 11, 36, 36, 13, -13, 14, 14, 45, 45, 16, -16, 17, 17, 54, 54, 19, -19, 20, 20, 63, 63, 22, -22, 23, 23, 72, 72, 25, -25, 26, 26, 81, 81, 28, -28, 29, 29, 90, 90, 31, -31, 32, 32, 99, 99, 34, -34, 35, 35, 108, 108, 37, -37, 38, 38, 117, 117, 40, -40, 41, 41, 126
OFFSET
0,3
COMMENTS
Floretion Algebra Multiplication Program, FAMP Code: 4kbasesigcycrokseq[ + .25'j - .25'k + .25j' - .25k' + .5'ii' + .25'ij' + .25'ik' + .25'ji' + .25'ki' + .5e]. See link to "Sequences in Context" for details on the "roktype" used.
FORMULA
For n>=0, a(6n+2)=a(6n+3)=6n+2; a(6n+5)=6n+5; a(6n+6)=-6n-6; a(6n+3)=a(6n+4)=9n+9.
a(n) = 2*a(n-6) - a(n-12) for n>13. - Colin Barker, May 14 2019
PROG
(PARI) -Vec((1 - x - 2*x^2 - 2*x^3 - 9*x^4 - 9*x^5 - 6*x^6 + 6*x^7 - x^8 - x^9 + 2*x^12 - 2*x^13) / ((1 - x)^2*(1 + x)^2*(1 - x + x^2)^2*(1 + x + x^2)^2) + O(x^65)) \\ Colin Barker, May 14 2019
CROSSREFS
Sequence in context: A229116 A346918 A203904 * A056856 A133920 A229594
KEYWORD
sign
AUTHOR
Creighton Dement, Apr 22 2005
STATUS
approved