login
A160737
4*P_5(n), 4 times the Legendre Polynomial of order 5 at n.
6
0, 4, 743, 6732, 30046, 94100, 237429, 517468, 1014332, 1834596, 3115075, 5026604, 7777818, 11618932, 16845521, 23802300, 32886904, 44553668, 59317407, 77757196, 100520150, 128325204, 161966893, 202319132, 250338996, 307070500, 373648379
OFFSET
0,2
FORMULA
a(n) = n*(63*n^4-70*n^2+15)/2. - Vaclav Kotesovec, Jul 31 2013
G.f.: x*(4+719*x+2334*x^2+719*x^3+4*x^4) / (x-1)^6 . - R. J. Mathar, May 06 2016
MAPLE
A160737 := proc(n)
4*orthopoly[P](5, n) ;
end proc: # R. J. Mathar, Oct 24 2011
MATHEMATICA
Table[4 LegendreP[5, n], {n, 0, 50}]
PROG
(PARI) a(n)=4*pollegendre(5, n) \\ Charles R Greathouse IV, Mar 18 2017
(Magma) [n*(63*n^4-70*n^2+15)/2: n in [0..30]]; // G. C. Greubel, May 02 2018
CROSSREFS
Sequence in context: A090588 A053986 A222961 * A128846 A332174 A195625
KEYWORD
nonn,easy
AUTHOR
N. J. A. Sloane, Nov 17 2009
STATUS
approved