OFFSET
0,1
LINKS
Vincenzo Librandi, Table of n, a(n) for n = 0..10000
Index entries for linear recurrences with constant coefficients, signature (3,-3,1).
FORMULA
From Colin Barker, Mar 30 2017: (Start)
G.f.: (81 + 118*x + x^2) / (1 - x)^3.
a(n) = 3*a(n-1) - 3*a(n-2) + a(n-3) for n>2.
(End)
MAPLE
MATHEMATICA
Table[(10 n + 9)^2, {n, 0, 37}] (* or *)
LinearRecurrence[{3, -3, 1}, {81, 361, 841}, 38] (* or *)
CoefficientList[Series[(81 + 118 x + x^2)/(1 - x)^3, {x, 0, 37}], x] (* Michael De Vlieger, Mar 30 2017 *)
PROG
(Magma) [(10*n+9)^2: n in [0..40]]; // Vincenzo Librandi, Aug 31 2011
(PARI) a(n) = (10*n+9)^2; \\ Michel Marcus, Aug 26 2015
(PARI) Vec((81 + 118*x + x^2) / (1 - x)^3 + O(x^40)) \\ Colin Barker, Mar 30 2017
CROSSREFS
KEYWORD
nonn,easy
AUTHOR
STATUS
approved