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”).

A124025
Duplicate of A123965.
0
1, 3, -1, 8, -6, 1, 21, -25, 9, -1, 55, -90, 51, -12, 1, 144, -300, 234, -86, 15, -1, 377, -954, 951, -480, 130, -18, 1, 987, -2939, 3573, -2305, 855, -183, 21, -1, 2584, -8850, 12707, -10008, 4740, -1386, 245, -24, 1, 6765, -26195, 43398, -40426, 23373, -8715, 2100, -316, 27, -1, 17711, -76500, 143682
OFFSET
1,2
REFERENCES
Joanne Dombrowski, Tridiagonal matrix representations of cyclic selfadjoint operators, Pacific J. Math. 114, no. 2 (1984), 325-334
FORMULA
Recursive polynomial from a tridiagonal matrix version of A123965 ( first number different): p(k, x) = ((x - b(k - 1))*p(k - 1, x) - a(k - 2)*p(k - 2, x))/a(n - 1); a(n)=-1;b(n)=3;
MATHEMATICA
b[k_] = 3; a[k_] = -1; p[0, x] = 1; p[1, x] = (x - b[1])/a[1]; p[k_, x_] := p[k, x] = ((x - b[k - 1])*p[k - 1, x] - a[k - 2]*p[k - 2, x])/a[k - 1]; w = Table[CoefficientList[p[n, x], x], {n, 0, 10}]; Flatten[w]
CROSSREFS
KEYWORD
dead
AUTHOR
Roger L. Bagula, Oct 31 2006
STATUS
approved