|
|
A277282
|
|
Max coefficient in n-th Lucas polynomial.
|
|
2
|
|
|
2, 1, 2, 3, 4, 5, 9, 14, 20, 30, 50, 77, 112, 182, 294, 450, 672, 1122, 1782, 2717, 4290, 7007, 11011, 16744, 27456, 44200, 68952, 107406, 176358, 281010, 436050, 700910, 1136960, 1797818, 2778446, 4576264, 7354710, 11560835, 18349630, 29910465, 47720400
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
0,1
|
|
LINKS
|
|
|
EXAMPLE
|
For n = 6, L_6(x) = x^6 + 6*x^4 + 9*x^2 + 2, so a(6) = 9.
|
|
MATHEMATICA
|
Table[Max@CoefficientList[LucasL[n, x], x], {n, 0, 40}]
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|