OFFSET
1,2
LINKS
Vincenzo Librandi, Table of n, a(n) for n = 1..200
Index entries for linear recurrences with constant coefficients, signature (22,-41,20).
FORMULA
From R. J. Mathar, Jul 15 2010: (Start)
G.f.: x/((1-20*x)*(x-1)^2).
a(n) = 22*a(n-1) - 41*a(n-2) + 20*a(n-3). (End)
MATHEMATICA
LinearRecurrence[{22, -41, 20}, {1, 22, 443}, 20] (* Vincenzo Librandi, Oct 20 2012 *)
PROG
(Magma) I:=[1, 22, 443]; [n le 3 select I[n] else 22*Self(n-1) - 41*Self(n-2) + 20*Self(n-3): n in [1..20]]; // Vincenzo Librandi, Oct 20 2012
(Maxima)
a[1]:1$
a[2]:22$
a[3]:443$
a[n]:=22*a[n-1]-41*a[n-2]+20*a[n-3]$
A014904(n):=a[n]$
makelist(A014904(n), n, 1, 30); /* Martin Ettl, Nov 06 2012 */
(PARI) Vec(x/((1-20*x)*(x-1)^2)+O(x^99)) \\ Charles R Greathouse IV, Jul 05 2024
CROSSREFS
KEYWORD
nonn,easy
AUTHOR
STATUS
approved