|
|
A373168
|
|
Triangle read by rows: the exponential almost-Riordan array ( exp(x/(1-x)) | 1/(1-x), x ).
|
|
0
|
|
|
1, 1, 1, 3, 1, 1, 13, 2, 2, 1, 73, 6, 6, 3, 1, 501, 24, 24, 12, 4, 1, 4051, 120, 120, 60, 20, 5, 1, 37633, 720, 720, 360, 120, 30, 6, 1, 394353, 5040, 5040, 2520, 840, 210, 42, 7, 1, 4596553, 40320, 40320, 20160, 6720, 1680, 336, 56, 8, 1, 58941091, 362880, 362880, 181440, 60480, 15120, 3024, 504, 72, 9, 1
(list;
table;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
0,4
|
|
LINKS
|
|
|
FORMULA
|
T(n,0) = n! * [x^n] exp(x/(1-x)); T(n,k) = (n-1)!/(k-1)! * [x^(n-1)] 1/(1-x)*x^(k-1).
T(n,11) = A051431(n-11) for n > 10.
|
|
EXAMPLE
|
The triangle begins:
1;
1, 1;
3, 1, 1;
13, 2, 2, 1;
73, 6, 6, 3, 1;
501, 24, 24, 12, 4, 1;
4051, 120, 120, 60, 20, 5, 1;
...
|
|
MATHEMATICA
|
T[n_, 0]:=n!SeriesCoefficient[Exp[x/(1-x)], {x, 0, n}]; T[n_, k_]:=(n-1)!/(k-1)!SeriesCoefficient[1/(1-x)*x^(k-1), {x, 0, n-1}]; Table[T[n, k], {n, 0, 10}, {k, 0, n}]//Flatten
|
|
CROSSREFS
|
|
|
KEYWORD
|
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|