OFFSET
1,6
COMMENTS
Row sums yield A000670 (without leading 1).
LINKS
Eric Weisstein's World of Mathematics, Polylogarithm
FORMULA
Row n is generated by the polynomial (1 - x - 1/x)^(n + 1)*x^(n - 1)*Li(-n, x + 1/x)/(x + 1/x), where Li(n, z) is the polylogarithm function.
E.g.f.: (exp(x*y) - exp((1 + x^2)*y))/(x*exp((1 + x^2)*y) - (1 + x^2)*exp(x*y)). - Franck Maminirina Ramaharo, Oct 25 2018
EXAMPLE
Triangle begins:
1;
1, 1, 1;
1, 4, 3, 4, 1;
1, 11, 14, 23, 14, 11, 1;
1, 26, 70, 104, 139, 104, 70, 26, 1;
1, 57, 307, 530, 973, 947, 973, 530, 307, 57, 1;
... reformatted. - Franck Maminirina Ramaharo, Oct 25 2018
MATHEMATICA
Table[CoefficientList[FullSimplify[ExpandAll[(1 - x - 1/x)^(n + 1)*x^(n - 1)*PolyLog[-n, x + 1/x]/(x + 1/x)]], x], {n, 1, 10}]//Flatten
CROSSREFS
KEYWORD
nonn,tabf
AUTHOR
Roger L. Bagula and Gary W. Adamson, Oct 25 2008
EXTENSIONS
Edited and new name by Franck Maminirina Ramaharo, Oct 25 2018
STATUS
approved