OFFSET
1,1
LINKS
Vincenzo Librandi, Table of n, a(n) for n = 1..200
Index entries for linear recurrences with constant coefficients, signature (2031,-2031,1).
FORMULA
a(n+2) = 2030*a(n+1)-a(n)+1014.
a(n) = A145718(n)/127. - Colin Barker, Oct 18 2014
G.f.: x*(7*x^2-1015*x-6) / ((x-1)*(x^2-2030*x+1)). - Colin Barker, Oct 18 2014
EXAMPLE
a(1)=6 because the first relation is 7^3-6^3=127*1^2.
MATHEMATICA
CoefficientList[Series[(7 x^2 - 1015 x - 6)/((x - 1) (x^2 - 2030 x + 1)), {x, 0, 20}], x] (* Vincenzo Librandi, Oct 18 2014 *)
PROG
(PARI) Vec(x*(7*x^2-1015*x-6)/((x-1)*(x^2-2030*x+1)) + O(x^20)) \\ Colin Barker, Oct 18 2014
(Magma) I:=[6, 13201]; [n le 2 select I[n] else 2030*Self(n-1)-Self(n-2)+1014: n in [1..20]]; // Vincenzo Librandi, Oct 18 2014
CROSSREFS
KEYWORD
easy,nonn
AUTHOR
Richard Choulet, Oct 16 2008
EXTENSIONS
Editing and more terms from Colin Barker, Oct 18 2014
STATUS
approved