|
| |
|
|
A136532
|
|
Coefficients of Laguerre recursive polynomials with an (n+2)!/2 multiplication factor and alpha=a0 =-1 from Hochstadt: P(x, n) = (2*n + a0 + 1 - x)*P(x, n - 1)/(n + 1) - n*P(x, n - 2)/(n + 1);.
|
|
0
| |
|
|
1, 0, -3, -8, -16, 4, -60, -65, 50, -5, -384, -168, 462, -108, 6, -2380, 763, 3836, -1624, 196, -7, -14208, 21248, 29560, -21472, 4256, -320, 8, -73836, 302571, 199998, -269127, 78840, -9387, 486, -9, -176000, 3761240, 854530, -3288940, 1360150, -228880, 18430, -700, 10, 3824964, 44711623
(list; table; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 1,3
|
|
|
COMMENTS
| Table[Apply[Plus, CoefficientList[(n + 2)!P[x, n]/2, x]], {n, 0, 10}];
Row sums:
{1, -3, -20, -80, -192, 784, 19072, 229536, 2299840, 20282944, 144429312}
|
|
|
REFERENCES
| page 8 and page 42 - 43; Harry Hochstadt, The Functions of Mathematical Physics, Dover, New York, 1986
|
|
|
FORMULA
| a0=-1; p(x,0)=1;p(x,1)=1+a0-x; P(x, n) = (2*n + a0 + 1 - x)*P(x, n - 1)/(n + 1) - n*P(x, n - 2)/(n + 1);
|
|
|
EXAMPLE
| {1},
{0, -3},
{-8, -16, 4},
{-60, -65,50, -5},
{-384, -168, 462, -108, 6},
{-2380, 763, 3836, -1624, 196, -7},
{-14208, 21248, 29560, -21472, 4256, -320, 8},
{-73836, 302571, 199998, -269127, 78840, -9387, 486, -9},
{-176000, 3761240, 854530, -3288940, 1360150, -228880, 18430, -700, 10},
{3824964, 44711623, -7017472, -39417422, 22743644, -5098676, 568568, -33242,968, -11},
{104573760, 520004832, -304428396, -457688256,376007784, -108589488, 15755712, -1261536, 56184, -1296, 12}
|
|
|
MATHEMATICA
| a0 = -1; P[x, 0] = 1; P[x, 1] = 1 + a0 - x; P[x_, n_] := P[x, n] = (2*n + a0 + 1 - x)*P[x, n - 1]/(n + 1) - n*P[x, n - 2]/(n + 1); Table[ExpandAll[(n + 2)!*P[x, n]/2], {n, 0, 10}]; a = Table[CoefficientList[(n + 2)!*P[x, n]/2, x], {n, 0, 10}]; Flatten[a]
|
|
|
CROSSREFS
| Cf. A021009.
Sequence in context: A065500 A120341 A094357 * A030417 A190450 A188012
Adjacent sequences: A136529 A136530 A136531 * A136533 A136534 A136535
|
|
|
KEYWORD
| uned,tabl,sign
|
|
|
AUTHOR
| Roger L. Bagula (rlbagulatftn(AT)yahoo.com), Mar 23 2008
|
| |
|
|
