|
|
A144139
|
|
Chebyshev polynomial of the second kind U(4,n).
|
|
9
|
|
|
1, 5, 209, 1189, 3905, 9701, 20305, 37829, 64769, 104005, 158801, 232805, 330049, 454949, 612305, 807301, 1045505, 1332869, 1675729, 2080805, 2555201, 3106405, 3742289, 4471109, 5301505, 6242501, 7303505, 8494309, 9825089, 11306405
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
0,2
|
|
LINKS
|
|
|
FORMULA
|
a(n) = 16*n^4-12*n^2+1 = (4*n^2-2*n-1)*(4*n^2+2*n-1). - Vincenzo Librandi, May 29 2014
(End)
|
|
MATHEMATICA
|
lst={}; Do[AppendTo[lst, ChebyshevU[4, n]], {n, 0, 9^2}]; lst
CoefficientList[Series[(1 + 194 x^2 + 184 x^3 + 5 x^4)/(1 - x)^5, {x, 0, 40}], x] (* Vincenzo Librandi, May 29 2014 *)
|
|
PROG
|
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn,easy
|
|
AUTHOR
|
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|