OFFSET
1,1
LINKS
Colin Barker, Table of n, a(n) for n = 1..108
Index entries for linear recurrences with constant coefficients, signature (1416317955,-1416317955,1).
FORMULA
a(n) = 1416317955*a(n-1) - 1416317955*a(n-2) + a(n-3).
G.f.: -16*x*(76*x^2-106213627505*x+84318395161) / ((x-1)*(x^2-1416317954*x+1)).
a(n) = (55406+2523*(708158977+408855776*sqrt(3))^(-n)*(43-24*sqrt(3)+(43+24*sqrt(3))*(708158977+408855776*sqrt(3))^(2*n)))/224. - Colin Barker, Mar 07 2016
EXAMPLE
MATHEMATICA
CoefficientList[Series[16 (76 x^2 - 106213627505 x + 84318395161)/((1 - x) (x^2 - 1416317954 x + 1)), {x, 0, 33}], x] (* Vincenzo Librandi, May 31 2015 *)
LinearRecurrence[{1416317955, -1416317955, 1}, {1349094322576, 1910746510353532612000, 2706224588156555124000697809136}, 10] (* Harvey P. Dale, Jan 19 2016 *)
PROG
(PARI) Vec(-16*x*(76*x^2-106213627505*x+84318395161) / ((x-1)*(x^2-1416317954*x+1)) + O(x^20))
(Magma) I:=[1349094322576, 1910746510353532612000, 2706224588156555124000697809136]; [n le 3 select I[n] else 1416317955*Self(n-1)-1416317955*Self(n-2)+Self(n-3): n in [1..10]]; // Vincenzo Librandi, May 31 2015
CROSSREFS
KEYWORD
nonn,easy
AUTHOR
Colin Barker, May 30 2015
STATUS
approved