OFFSET
1,2
LINKS
Vincenzo Librandi, Table of n, a(n) for n = 1..5000
Index entries for linear recurrences with constant coefficients, signature (4, -6, 4, -1).
FORMULA
a(n) = 4*a(n-1) - 6*a(n-2) + 4*a(n-3) - a(n-4); a(1)=1, a(2)=38, a(3)=174, a(4)=472. - Harvey P. Dale, Dec 18 2011
G.f.: (28*x^2 + 34*x + 1)/(x-1)^4. - Harvey P. Dale, Dec 18 2011
MATHEMATICA
Table[(63n^3-81n^2+24n)/6, {n, 40}]
LinearRecurrence[{4, -6, 4, -1}, {1, 38, 174, 472}, 40] (* or *) CoefficientList[ Series[(1+34x+28x^2)/(-1+x)^4, {x, 0, 40}], x](* Harvey P. Dale, Dec 18 2011 *)
PROG
(Magma) [(1/6)*(63*n^3-81*n^2+24*n): n in [1..40]]; // Vincenzo Librandi, Jul 26 2011
CROSSREFS
KEYWORD
easy,nonn
AUTHOR
James A. Record (james.record(AT)gmail.com), Nov 07 2004
STATUS
approved