The OEIS is supported by the many generous donors to the OEIS Foundation.

 Hints (Greetings from The On-Line Encyclopedia of Integer Sequences!)
 A137370 Triangle: signed version of A055134. 0
 1, 0, 1, 1, -2, 1, -8, 12, -6, 1, 81, -108, 54, -12, 1, -1024, 1280, -640, 160, -20, 1, 15625, -18750, 9375, -2500, 375, -30, 1, -279936, 326592, -163296, 45360, -7560, 756, -42, 1, 5764801, -6588344, 3294172, -941192, 168070, -19208, 1372, -56, 1, -134217728, 150994944, -75497472, 22020096, -4128768 (list; table; graph; refs; listen; history; text; internal format)
 OFFSET 1,5 LINKS Table of n, a(n) for n=1..50. EXAMPLE {1}, {0, 1}, {1, -2, 1}, {-8, 12, -6, 1}, {81, -108, 54, -12, 1}, {-1024, 1280, -640, 160, -20, 1}, {15625, -18750, 9375, -2500, 375, -30, 1}, {-279936, 326592, -163296, 45360, -7560, 756, -42, 1},... MATHEMATICA B[0] = {{x, y}, {t*y, x}}; B[n_] := B[n] = B[n - 1].B[0]; Table[Det[B[n]] /. x -> Sqrt[z] /. y -> 1 /. t -> n, {n, 0, 10}]; a = Join[{{1}}, Table[CoefficientList[Det[B[n]] /. x -> Sqrt[z] /. y ->1 /. t -> n, z], {n, 0, 10}]]; Flatten[a] CROSSREFS Sequence in context: A367382 A118708 A055134 * A214272 A214273 A214274 Adjacent sequences: A137367 A137368 A137369 * A137371 A137372 A137373 KEYWORD tabl,sign,less AUTHOR Roger L. Bagula, Apr 09 2008 EXTENSIONS Edited by Joerg Arndt, Feb 12 2024 STATUS approved

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recents
The OEIS Community | Maintained by The OEIS Foundation Inc.

Last modified June 21 04:30 EDT 2024. Contains 373540 sequences. (Running on oeis4.)