login
This site is supported by donations to The OEIS Foundation.

 

Logo


Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A113025 Triangle of integer coefficients of polynomials P(n,x) of degree n arising in diagonal Padé approximation of exp(x). 4
1, 1, 2, 1, 6, 12, 1, 12, 60, 120, 1, 20, 180, 840, 1680, 1, 30, 420, 3360, 15120, 30240, 1, 42, 840, 10080, 75600, 332640, 665280, 1, 56, 1512, 25200, 277200, 1995840, 8648640, 17297280, 1, 72, 2520, 55440, 831600, 8648640, 60540480, 259459200 (list; table; graph; refs; listen; history; text; internal format)
OFFSET

0,3

COMMENTS

exp(x) is well approximated by P(n,x)/P(n,-x). (P(n,1)/P(n,-1))_{n>=0} is a sequence of convergents to e: i.e., P(n,1) = A001517(n) and P(n,-1) = abs(A002119(n)).

From Roger L. Bagula, Feb 15 2009: (Start)

Riordan calls these coefficients of Bessel polynomials and gives an alternate form: p(x,n) = Sum_{k=0..n} binomial(n+k, 2k)*((2k)!/(k!*2^k))*x^k.

Row sums are A001517. (End)

REFERENCES

J. Riordan, Combinatorial Identities, Wiley, 1968, p.77. [From Roger L. Bagula, Feb 15 2009]

LINKS

G. C. Greubel, Table of n, a(n) for the firs 50 rows, flattened

H. L. Krall and O. Fink, A New Class of Orthogonal Polynomials: The Bessel Polynomials, Trans. Amer. Math. Soc. 65, 100-115, 1949.

Eric Weisstein's World of Mathematics, Padé approximants.

F. Wielonsky, Asymptotics of diagonal Hermite-Pade approximants to exp(x), J. Approx. Theory 90 (1997) 283-298.

FORMULA

P(n,x) = Sum_{k=0..n} (n+k)!/(k!*(n-k)!)*x^(n-k).

EXAMPLE

P(3,x) = x^3 + 12*x^2 + 60*x + 120.

From Roger L. Bagula, Feb 15 2009: (Start)

{1},

{1, 2},

{1, 6, 12},

{1, 12, 60, 120},

{1, 20, 180, 840, 1680},

{1, 30, 420, 3360, 15120, 30240},

{1, 42, 840, 10080, 75600, 332640, 665280},

{1, 56, 1512, 25200, 277200, 1995840, 8648640, 17297280},

{1, 72, 2520, 55440, 831600, 8648640, 60540480, 259459200, 518918400},

{1, 90, 3960, 110880, 2162160, 30270240, 302702400, 2075673600, 8821612800, 17643225600},

{1, 110, 5940, 205920, 5045040, 90810720, 1210809600, 11762150400, 79394515200, 335221286400, 670442572800} (End)

MATHEMATICA

L[n_, m_] = (n + m)!/((n - m)!*m!);

Table[Table[L[n, m], {m, 0, n}], {n, 0, 10}];

Flatten[%] (* Roger L. Bagula, Feb 15 2009 *)

P[x_, n_] := Sum[ (2*n - k)!/(k!*(n - k)!)*x^(k), {k, 0, n}]; Table[Reverse[CoefficientList[P[x, n], x]], {n, 0, 10}] // Flatten (* G. C. Greubel, Aug 15 2017 *)

PROG

(PARI) T(n, k)=(n+k)!/k!/(n-k)!

CROSSREFS

Sequence in context: A283746 A049949 A106192 * A113216 A081064 A128534

Adjacent sequences:  A113022 A113023 A113024 * A113026 A113027 A113028

KEYWORD

nonn,tabl

AUTHOR

Benoit Cloitre, Jan 03 2006

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

License Agreements, Terms of Use, Privacy Policy .

Last modified September 20 12:31 EDT 2017. Contains 292271 sequences.