OFFSET
1,1
LINKS
Vincenzo Librandi, Table of n, a(n) for n = 1..200
Index entries for linear recurrences with constant coefficients, signature (8,0,1,-8).
FORMULA
G.f.: (2+x) / ((x-1)*(8*x-1)*(1+x+x^2)). - R. J. Mathar, Nov 21 2011
MATHEMATICA
With[{c=Flatten[Table[{2, 1, 0}, {7}]]}, Table[FromDigits[Take[c, n], 8], {n, 20}]] (* Harvey P. Dale, Aug 03 2011 *)
LinearRecurrence[{8, 0, 1, -8}, {2, 17, 136, 1090}, 200] (* Vincenzo Librandi, Nov 23 2011 *)
PROG
(Magma) I:=[2, 17, 136, 1090]; [n le 4 select I[n] else 8*Self(n-1)+Self(n-3)-8*Self(n-4): n in [1..20]]; // Vincenzo Librandi, Nov 23 2011
CROSSREFS
KEYWORD
nonn,base,easy
AUTHOR
STATUS
approved