A167587 The fifth row of the ED4 array A167584: 80*n^4 + 952*n^2 - 768*n + 525.

789, 4077, 13269, 33165, 70485, 133869, 233877, 382989, 595605, 888045, 1278549, 1787277, 2436309, 3249645, 4253205, 5474829, 6944277, 8693229, 10755285, 13165965, 15962709, 19184877, 22873749, 27072525, 31826325

Offset

1,1

Links

Vincenzo Librandi, Table of n, a(n) for n = 1..10000

Index entries for linear recurrences with constant coefficients, signature (5,-10,10,-5,1).

Formula

a(n) = 80*n^4 + 952*n^2 - 768*n + 525. [Simplified by M. F. Hasler, Oct 08 2014]

G.f.: (525*z^4 - 300*z^3 + 774*z^2 + 132*z + 789)/(1-z)^5.

a(n) = 5*a(n-1) - 10*a(n-2) + 10*a(n-3) - 5*a(n-4) + a(n-5); a(1)=789, a(2)=4077, a(3)=13269, a(4)=33165, a(5)=70485. - Harvey P. Dale, Jul 21 2011

Mathematica

Table[80n^4+952n^2-768n+525, {n, 30}] (* or *) LinearRecurrence[ {5, -10, 10, -5, 1}, {789, 4077, 13269, 33165, 70485}, 30] (* Harvey P. Dale, Jul 21 2011 *)

Prog

(Magma) [80*n^4+952*n^2-768*n+525: n in [1..35]]; // Vincenzo Librandi, Jul 21 2011, simplified by M. F. Hasler, Oct 08 2014
(PARI) a(n)=80*n^4+952*n^2-768*n+525 \\ M. F. Hasler, Oct 08 2014

Crossrefs

Equals the fifth row of the ED4 array A167584.

Sequence in context: A207280 A207476 A207532 * A182387 A237735 A252517

Adjacent sequences: A167584 A167585 A167586 * A167588 A167589 A167590

Keyword

easy,nonn

Author

Johannes W. Meijer, Nov 10 2009

Extensions

Corrected and edited by M. F. Hasler, Oct 08 2014

Status

approved