OFFSET
0,1
LINKS
Vincenzo Librandi, Table of n, a(n) for n = 0..1000
Index entries for linear recurrences with constant coefficients, signature (17,-70).
FORMULA
MATHEMATICA
Table[(7^n + 10^n), {n, 0, 30}] (* or *) CoefficientList[Series[(2 - 17 x)/((1 - 7 x) (1 - 10 x)), {x, 0, 40}], x]
PROG
(Magma) [7^n+10^n: n in [0..25]]; /* or */ I:=[2, 17]; [n le 2 select I[n] else 17*Self(n-1)-70*Self(n-2): n in [1..25]];
CROSSREFS
KEYWORD
nonn,easy
AUTHOR
Vincenzo Librandi, Aug 04 2014
STATUS
approved