A167547 The fourth row of the ED1 array A167546.
6, 48, 160, 384, 762, 1336, 2148, 3240, 4654, 6432, 8616, 11248, 14370, 18024, 22252, 27096, 32598, 38800, 45744, 53472, 62026, 71448, 81780, 93064, 105342, 118656, 133048, 148560, 165234, 183112, 202236, 222648, 244390, 267504, 292032, 318016
Offset: 1
Links
- G. C. Greubel, Table of n, a(n) for n = 1..1000
- Index entries for linear recurrences with constant coefficients, signature (4,-6,4,-1).
Crossrefs
Cf. A167546.
Programs
-
Mathematica
Table[7*n^3 - 7*n^2 + 14*n - 8, {n, 1, 100}] (* or *) LinearRecurrence[{4,-6,4,-1},{6, 48, 160, 384}, 100] (* G. C. Greubel, Jun 15 2016 *)
Formula
a(n) = 7*n^3 - 7*n^2 + 14*n - 8.
G.f.: (6+24*z+4*z^2+8*z^3)/(1-z)^4.
a(n) = 4*a(n-1) - 6*a(n-2) + 4*a(n-3) - a(n-4). - G. C. Greubel, Jun 15 2016