login
This site is supported by donations to The OEIS Foundation.

 

Logo


Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A108057 G.f. (x-1)*(x^2+1)*(x^7-x^6+x^4+x^3-2*x^2-x-1)/((x^2-x+1)*(x^6-x^3+1)*(x+1)^2). 0
1, -1, 3, -6, 7, -9, 10, -11, 13, -16, 17, -19, 22, -23, 25, -26, 27, -29, 32, -33, 35, -38, 39, -41, 42, -43, 45, -48, 49, -51, 54, -55, 57, -58, 59, -61, 64, -65, 67, -70, 71, -73, 74, -75, 77, -80, 81, -83, 86, -87, 89, -90, 91, -93, 96, -97, 99, -102, 103, -105, 106, -107, 109, -112, 113, -115, 118, -119, 121, -122 (list; graph; refs; listen; history; text; internal format)
OFFSET

0,3

LINKS

Table of n, a(n) for n=0..69.

Index entries for linear recurrences with constant coefficients, signature (-1,0,0,0,0,0,0,0,-1,-1).

MATHEMATICA

CoefficientList[Series[(x-1)(x^2+1)(x^7-x^6+x^4+x^3-2x^2-x-1)/((x^2-x+ 1) (x^6-x^3+1)(x+1)^2), {x, 0, 80}], x] (* or *) Join[{1}, LinearRecurrence[ {-1, 0, 0, 0, 0, 0, 0, 0, -1, -1}, {-1, 3, -6, 7, -9, 10, -11, 13, -16, 17}, 80]] (* Harvey P. Dale, Apr 17 2014 *)

PROG

Floretion Algebra Multiplication Program, FAMP Code: 4jbasesumseq[A*B+B*A] with A = + .25'i + .25i' + .25'ii' + .25'jj' + .25'kk' + .25'jk' + .25'kj' + .25e and B = + .5'i - .5'k - .5'jj' - .5'ji' - .5'jk' + .5e

CROSSREFS

Sequence in context: A283762 A088045 A267983 * A190189 A129414 A157319

Adjacent sequences:  A108054 A108055 A108056 * A108058 A108059 A108060

KEYWORD

sign,easy

AUTHOR

Creighton Dement, Jun 02 2005

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 | More pages
The OEIS Community | Maintained by The OEIS Foundation Inc.

License Agreements, Terms of Use, Privacy Policy .

Last modified June 29 01:46 EDT 2017. Contains 288856 sequences.