OFFSET
2,1
LINKS
Klaus Sutner and Sam Tetruashvili, Inferring automatic sequences.
FORMULA
Ultimately periodic with period length 4.
G.f.: x^2*(7 + 8*x + 5*x^2 + 4*x^3 + 2*x^4)/(1 - x^4). - Vincenzo Librandi, Nov 19 2012
MATHEMATICA
Join[{7}, CoefficientList[Series[(8 + 5*x + 4*x^2 + 9x^3)/((1 - x^4)), {x, 0, 30}], x]] (* Vincenzo Librandi, Nov 18 2012 *)
PROG
(Magma) [7] cat &cat[[8, 5, 4, 9]: n in [0..30]]; // Vincenzo Librandi, Nov 18 2012
CROSSREFS
KEYWORD
nonn
AUTHOR
N. J. A. Sloane, Oct 07 2012
EXTENSIONS
Terms corrected by Vincenzo Librandi, Nov 18 2012
STATUS
approved