|
|
A101125
|
|
Row sums of a Chebyshev number triangle.
|
|
4
|
|
|
1, 1, 1, 4, 13, 49, 233, 1240, 7201, 45521, 311225, 2285116, 17909309, 149080865, 1312597361, 12180044528, 118740086369, 1212695223137, 12942512039697, 144018843991220, 1667526171728525, 20053044685823697, 250043383489271193
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
0,4
|
|
COMMENTS
|
|
|
LINKS
|
|
|
FORMULA
|
a(n)=sum{k=0..n, if(k<n, T(n-k, k), if(k=n, 1, 0))} where T(n, k)=(n/2)sum{j=0..floor(n/2), C(n-j, j)(-1)^j*(2k)^(n-2j)}.
|
|
MATHEMATICA
|
Table[Sum[ChebyshevT[k, n-k], {k, 0, n}], {n, 0, 30}] (* Vaclav Kotesovec, Jan 20 2019 *)
|
|
PROG
|
(PARI) {a(n) = sum(k=0, n, polchebyshev(k, 1, n-k))} \\ Seiichi Manyama, Jan 20 2019
|
|
CROSSREFS
|
|
|
KEYWORD
|
easy,nonn
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|