OFFSET
0,2
COMMENTS
The row polynomials s(n,x) := n!*L(n,4,x)= sum(a(n,m)*x^m,m=0..n) have g.f. exp(-z*x/(1-z))/(1-z)^5. They are Sheffer polynomials satisfying the binomial convolution identity s(n,x+y) = sum(binomial(n,k)*s(k,x)*p(n-k,y),k=0..n), with polynomials p(n,x)=sum(|A008297(n,m)|*(-x)^m, m=1..n) and p(0,x)=1 (for Sheffer polynomials see A048854 for S. Roman reference).
LINKS
FORMULA
T(n, m) = ((-1)^m)*n!*binomial(n+4, n-m)/m!.
E.g.f. for m-th column sequence: ((-x/(1-x))^m)/(m!*(1-x)^5), m >= 0.
EXAMPLE
Triangle begins:
{1};
{5,-1};
{30,-12,1};
{210,-126,21,-1};
...
2!*L(2,4,x)=30-12*x+x^2.
MATHEMATICA
Flatten[Table[((-1)^m)*n!*Binomial[n+4, n-m]/m!, {n, 0, 11}, {m, 0, n}]] (* Indranil Ghosh, Feb 23 2017 *)
PROG
(Python)
import math
f=math.factorial
def C(n, r):
return f(n)//f(r)//f(n-r)
i=0
for n in range(26):
for m in range(n+1):
print(i, (-1)**m*f(n)*C(n+4, n-m)//f(m))
i+=1 # Indranil Ghosh, Feb 23 2017
(PARI) row(n) = Vecrev(n!*pollaguerre(n, 4)); \\ Michel Marcus, Feb 06 2021
CROSSREFS
KEYWORD
AUTHOR
Wolfdieter Lang, Jun 19 2001
STATUS
approved