|
| |
|
|
A160485
|
|
Triangle of the RBS1 polynomial coefficients
|
|
5
| |
|
|
1, 1, -2, 1, -8, 12, 1, -2, 60, -120, 1, -128, -168, 0, 1680, 1, 2638, 7320, -5040, -25200, -30240, 1, -98408, -300828, 52800, 1053360, 1330560, 665280, 1, 5307118, 17914260, 2522520, -56456400, -90810720, -60540480, -17297280
(list; table; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 1,3
|
|
|
COMMENTS
| In A160480 we defined the BS1 matrix by BS1[2*m-1,n=1] = 2*beta(2*m) and the recurrence relation BS1 [2*m-1,n] = (2*n-3)/(2*n-2)*(BS1[2*m-1,n-1]- BS1[2*m-3,n-1]/(2*n-3)^2), for positive and negative values of m and n= 1, 2, .. . As usual beta(m) = sum((-1)^k/(1+2*k)^m, k=0..infinity). It is well-known that BS1[1-2*m,n=1] = euler(2*m-2) for m = 1, 2, .., with euler(2*m-2) the Euler numbers A000364. These values together with the recurrence relation lead to BS1[ -1,n] = 1 for n = 1, 2, .. .
We discovered that the n-th term of the row coefficients BS1[1-2*m,n] for m = 1, 2, .., can be generated with the rather simple polynomials RBS1(1-2*m,n). Our discovery was enabled by the recurrence relation for the RBS1(1-2*m,n) polynomials which we derived from the recurrence relation for the BS[2*m-1,n] coeffficients and the fact that RBS1(-1,n) = 1.
|
|
|
FORMULA
| RBS1(1-2*m,n) = (2*n-1)^2*RBS1(3-2*m,n)-(2*n)*(2*n-1)*RBS1(3-2*m,n+1) for m = 2, 3, .., with RBS1(-1,n) =1 for n = 1, 2, .. .
|
|
|
EXAMPLE
| The first few rows of the triangle are:
[1]
[1, -2]
[1, -8, 12]
[1, -2, 60, -120]
[1, -128, -168, 0, 1680]
The first few RBS1(1-2*m,n) polynomials are:
RBS1(-1,n) = 1
RBS1(-3,n) = 1 - 2*n
RBS1(-5,n) = 1 - 8*n +12*n^2
RBS1(-7,n) = 1 -2*n + 60*n^2 - 120*n^3
|
|
|
MAPLE
| restart; nmax:=8; mmax:=nmax: A(1, 1):=1: RBS1(n, 2):=(2*n-1)^2*1-(2*n)*(2*n-1)*1: for m from 3 to mmax do for k from 0 to m-1 do A(m-1, k+1):=coeff(RBS1(n, m-1), n, k) od; RBS1(n+1, m-1):=0: for k from 0 to m-1 do RBS1(n+1, m-1):=RBS1(n+1, m-1)+A(m-1, k+1)*(n+1)^k od: RBS1(n, m):= (2*n-1)^2*RBS1(n, m-1)-(2*n)*(2*n-1)* RBS1(n+1, m-1): od: for k from 0 to nmax-1 do A(nmax, k+1) :=coeff(RBS1(n, nmax), n, k) od: for n1 from 1 to nmax do for m2 from 1 to n1 do b((n1-1)*(n1)/2+m2) := A(n1, m2) od: od: a:=n-> b(n): seq(a(n), n=1..(nmax)*(nmax+1)/2);
|
|
|
CROSSREFS
| A160480 is the Beta triangle.
A009389(2*n) equals the second left hand column divided by 2.
A001813 equals the first right hand column.
The absolute values of the row sums equal the Euler numbers A000364.
Sequence in context: A160614 A164662 A007026 * A118708 A055134 A137370
Adjacent sequences: A160482 A160483 A160484 * A160486 A160487 A160488
|
|
|
KEYWORD
| easy,sign,tabl
|
|
|
AUTHOR
| Johannes W. Meijer (meijgia(AT)hotmail.com), May 24 2009
|
|
|
EXTENSIONS
| Edited by Johannes W. Meijer (meijgia(AT)hotmail.com), Jul 06 2009
|
| |
|
|
