A152462 - OEIS

A152462

A nonsense sequence.

1, 1, -1, 2, -1, 1, 3, -2, 1, -1, 5, -3, 3, -1, -1, 8, -5, 5, -4, -1, 7, 13, -8, 9, -7, 4, 7, -27, 21, -13, 15, -13, 9, -1, -27, 83, 34, -21, 25, -22, 19, -9, -14, 83, -239, 55, -34, 41, -37, 34, -25, -1, 62, -239, 659, 89, -55, 67, -61, 59, -49, 25, 41, -205, 659, -1781

(list; table; graph; refs; listen; history; text; internal format)

OFFSET

0,4

LINKS

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

EXAMPLE

{1},

{1, -1},

{2, -1, 1},

{3, -2, 1, -1},

{5, -3, 3, -1, -1},

{8, -5, 5, -4, -1, 7},

{13, -8, 9, -7, 4, 7, -27},

{21, -13, 15, -13, 9, -1, -27, 83},

{34, -21, 25, -22, 19, -9, -14,83, -239},

{55, -34, 41, -37, 34, -25, -1, 62, -239, 659},

{89, -55, 67, -61, 59, -49, 25, 41, -205, 659, -1781}

MATHEMATICA

M = Inverse[{{0, 1}, {1, 1}}];

a = Table[(MatrixPower[M, n].{1, 0})[[1]], {n, -30, 30}];

Table[Table[(MatrixPower[M, m].{a[[30 - (n - m + 1)]], a[[30 - (m - 1)]]})[[1]], {m, 0, n}], {n, 0, 10}];

Flatten[%]

CROSSREFS

Sequence in context: A287920 A027293 A104762 * A180360 A318805 A175331

Adjacent sequences: A152459 A152460 A152461 * A152463 A152464 A152465

KEYWORD

tabl,uned,obsc,less,sign

AUTHOR

Roger L. Bagula, Dec 05 2008

STATUS

approved