|
|
A287396
|
|
a(n) = (7*(csc(2*Pi/7))^2)^n + (7*(csc(4*Pi/7))^2)^n + (7*(csc(8*Pi/7))^2)^n.
|
|
1
|
|
|
3, 56, 1568, 53312, 1931776, 71300096, 2645479424, 98305622016, 3654656065536, 135885355483136, 5052615982317568, 187873377732526080, 6985794697679601664, 259756778648305139712, 9658687473893481906176, 359144636249686988029952, 13354285908291066433372160
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
0,1
|
|
LINKS
|
|
|
FORMULA
|
a(n) = x1^n + x2^n + x3^n, where x1, x2, x3 are the roots of x^3 - 56*x^2 + 784* x - 3136, x1 = 7*(csc(2*Pi/7))^2, x2 = 7*(csc(4*Pi/7))^2, x3 = 7*(csc(8*Pi/7))^2.
a(n) = 56*a(n-1) - 784*a(n-2) + 3136*a(n-3) for n>2, a(0) = 3, a(1) = 56, a(2) = 1568.
G.f.: (3 - 28*x)*(1 - 28*x) / (1 - 56*x + 784*x^2 - 3136*x^3). - Colin Barker, May 25 2017
|
|
MATHEMATICA
|
LinearRecurrence[{56, -784, 3136}, {3, 56, 1568}, 30] (* Harvey P. Dale, Aug 08 2017 *)
|
|
PROG
|
(PARI) Vec((3 - 28*x)*(1 - 28*x) / (1 - 56*x + 784*x^2 - 3136*x^3) + O(x^30)) \\ Colin Barker, May 25 2017
(PARI) polsym(x^3 - 56*x^2 + 784* x - 3136, 20) \\ Joerg Arndt, May 26 2017
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn,easy
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|