OFFSET
0,2
LINKS
Vincenzo Librandi, Table of n, a(n) for n = 0..10000
Index entries for linear recurrences with constant coefficients, signature (4, -6, 4, -1).
FORMULA
G.f.: (216*x^3 + 1333*x^2 + 508*x + 1)/(1-x)^4. - Vincenzo Librandi, Jan 27 2013
MAPLE
seq((7*n+1)^3, n=0..25); # Muniru A Asiru, Oct 13 2018
MATHEMATICA
CoefficientList[Series[(216*x^3 + 1333*x^2 + 508*x + 1)/(1 - x)^4, {x, 0, 30}], x] (* Vincenzo Librandi, Jan 27 2013 *)
(7*Range[0, 40]+1)^3 (* or *) LinearRecurrence[{4, -6, 4, -1}, {1, 512, 3375, 10648}, 40] (* Harvey P. Dale, Sep 15 2018 *)
PROG
(Magma) [(7*n+1)^3: n in [0..40]]; // Vincenzo Librandi, Jul 13 2011
(PARI) a(n) = (7*n+1)^3; \\ Altug Alkan, Oct 13 2018
(GAP) List([0..25], n->(7*n+1)^3); # Muniru A Asiru, Oct 13 2018
CROSSREFS
KEYWORD
nonn,easy
AUTHOR
STATUS
approved