|
|
A006750
|
|
Coefficients of Legendre polynomials.
(Formerly M4564)
|
|
1
|
|
|
8, 88, 2992, 23408, 354200, 2641320, 156641760, 1159149024, 17161845272, 127234370120, 3780912959824, 28153740304144, 420295123111864, 3144786170643656, 377374340477238720, 2836750530124023744
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
2,1
|
|
COMMENTS
|
Coefficient of Legendre_5(x) when x^n is written in term of Legendre polynomials. - Michel Marcus, May 28 2013
|
|
REFERENCES
|
N. J. A. Sloane and Simon Plouffe, The Encyclopedia of Integer Sequences, Academic Press, 1995 (includes this sequence).
|
|
LINKS
|
|
|
MATHEMATICA
|
Table[(22 n ((2 n - 2) (4 n + 1)) / ((2 n + 1) (2 n + 3) (2 n + 5) (2 n + 7))) Numerator[Binomial[4 n, 2 n] / 2^(4*n)], {n, 2, 20}] (* Vincenzo Librandi, Sep 08 2013 *)
|
|
PROG
|
(PARI) a(n) = (22*n*((2*n-2)*(4*n+1))/((2*n+1)*(2*n+3)*(2*n+5)*(2*n+7)))*numerator(binomial(4*n, 2*n)/2^(4*n)) \\ Michel Marcus, May 29 2013
(Magma) [(22*n*((2*n-2)*(4*n+1))/((2*n+1)*(2*n+3)*(2*n+5)*(2*n+7)))*Numerator(Binomial(4*n, 2*n)/2^(4*n)): n in [2..25]]; // Vincenzo Librandi, Sep 08 2013
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|