OFFSET
1,1
LINKS
Vincenzo Librandi, Table of n, a(n) for n = 1..200
Index entries for linear recurrences with constant coefficients, signature (11,-11,11,-10)
FORMULA
G.f.: (2+x)*x / ((x-1)*(10*x-1)*(x^2+1)). - R. J. Mathar, Nov 21 2011
MATHEMATICA
CoefficientList[Series[(2 + x) / ((x - 1) (10 x - 1) (x^2 + 1)), {x, 0, 40}], x] (* Vincenzo Librandi, Feb 16 2018 *)
Table[FromDigits[PadRight[{}, n, {2, 3, 1, 0}]], {n, 20}] (* Harvey P. Dale, Oct 21 2018 *)
PROG
(Magma) I:=[2, 23, 231, 2310]; [n le 4 select I[n] else 11*Self(n-1)-11*Self(n-2)+11*Self(n-3)-10*Self(n-4): n in [1..30]]; // Vincenzo Librandi, Feb 16 2018
CROSSREFS
KEYWORD
nonn,base
AUTHOR
STATUS
approved