login
A160699
A bisection of A063522.
2
0, 17, 154, 531, 1268, 2485, 4302, 6839, 10216, 14553, 19970, 26587, 34524, 43901, 54838, 67455, 81872, 98209, 116586, 137123, 159940, 185157, 212894, 243271, 276408, 312425, 351442, 393579, 438956, 487693, 539910, 595727, 655264, 718641, 785978, 857395
OFFSET
0,2
FORMULA
a(0)=0, a(1)=17, a(2)=154, a(3)=531, a(n) = 4*a(n-1) -6*a(n-2) +4*a(n-3) -a(n-4). - Harvey P. Dale, May 07 2011
MATHEMATICA
Table[LegendreP[3, 2n], {n, 0, 50}]
LinearRecurrence[{4, -6, 4, -1}, {0, 17, 154, 531}, 151] (* Harvey P. Dale, May 07 2011 *)
PROG
(PARI) a(n)=pollegendre(3, 2*n) \\ Charles R Greathouse IV, Mar 19 2017
(Magma) I:=[0, 17, 154, 531]; [n le 4 select I[n] else 4*Self(n-1) - 6*Self(n-2) +4*Self(n-3) -Self(n-4): n in [1..50]]; // G. C. Greubel, May 02 2018
CROSSREFS
Sequence in context: A164543 A295932 A298458 * A034272 A142087 A176838
KEYWORD
nonn,easy
AUTHOR
N. J. A. Sloane, Nov 17 2009
STATUS
approved