OFFSET
0,6
LINKS
Kent E. Morrison, Integer Sequences and Matrices Over Finite Fields, Journal of Integer Sequences, Vol. 9 (2006), Article 06.2.1.
FORMULA
T(n,k)/A005329(n) is the coefficient of y^k*x^n in 1/(1 - y (eq(x) - 1)) where eq(x) is the q-exponential function.
EXAMPLE
Triangle begins:
1;
0, 1;
0, 1, 3;
0, 1, 14, 21;
0, 1, 65, 315, 315;
0, 1, 372, 4650, 13020, 9765;
0, 1, 2823, 87234, 527310, 1025325, 615195;
MATHEMATICA
nn = 8; eq[z_] := Sum[z^n/FunctionExpand[QFactorial[n, q]], {n, 0, nn}]; Table[Take[(Table[ FunctionExpand[QFactorial[n, q]] /. q -> 2, {n, 0, nn}] CoefficientList[Series[ 1/(1 - u (eq[z] - 1)) /. q -> 2, {z, 0, nn}], {z, u}])[[i]], i], {i, 1, nn + 1}] // Grid
CROSSREFS
KEYWORD
nonn,tabl
AUTHOR
Geoffrey Critzer, Jul 28 2017
STATUS
approved