A160737 4*P_5(n), 4 times the Legendre Polynomial of order 5 at n.

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

Author

N. J. A. Sloane, Nov 17 2009

Keywords

• nonn
• easy

Links

• G. C. Greubel, Table of n, a(n) for n = 0..1000
• Index entries for linear recurrences with constant coefficients, signature (6,-15,20,-15,6,-1).

Programs

Magma

[n*(63*n^4-70*n^2+15)/2: n in [0..30]]; // G. C. Greubel, May 02 2018

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}]

PARI

a(n)=4*pollegendre(5,n) \\ Charles R Greathouse IV, Mar 18 2017

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