login
The OEIS Foundation is supported by donations from users of the OEIS and by a grant from the Simons Foundation.

 

Logo


Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A114952 Expansion of -x^2*(x^9-x^8+2*x^7-x^6+x^5-2*x^4+x^2+1) / ((x^6-x^4+x^2+1) * (x^6+x^4+x^2-1)). 0
0, 0, 1, 0, 1, 0, 1, 1, 2, 2, 3, 4, 7, 6, 11, 13, 24, 20, 37, 44, 81, 68, 125, 149, 274, 230, 423, 504, 927, 778, 1431, 1705, 3136, 2632, 4841, 5768, 10609, 8904, 16377, 19513, 35890, 30122, 55403, 66012, 121415, 101902, 187427, 223317, 410744, 344732 (list; graph; refs; listen; history; text; internal format)
OFFSET

0,9

LINKS

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

FORMULA

G.f.: -x^2*(x^9-x^8+2*x^7-x^6+x^5-2*x^4+x^2+1) / ((x^6-x^4+x^2+1) * (x^6+x^4+x^2-1)). [Colin Barker, Feb 17 2013]

MATHEMATICA

M = {{0, 1, 0}, {0, 0, 1}, {-I, -1, I}}; v[0] = {0, 1, 1}; v[n_] := v[n] = M.v[n - 1] aout = Flatten[Table[{Abs[Re[v[n][[1]]]], Abs[Im[v[n][[1]]]]}, {n, 0, 25}]]

CROSSREFS

Cf. A000073.

Sequence in context: A277320 A088633 A213042 * A328789 A086969 A014692

Adjacent sequences:  A114949 A114950 A114951 * A114953 A114954 A114955

KEYWORD

nonn,easy

AUTHOR

Roger L. Bagula, Feb 21 2006

EXTENSIONS

Better name by Colin Barker, Feb 17 2013

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

License Agreements, Terms of Use, Privacy Policy. .

Last modified February 19 13:23 EST 2020. Contains 332044 sequences. (Running on oeis4.)