A171243
Riordan array (f(x), x*g(x)), f(x) is the g.f. of A126952, g(x) is the g.f. of A117641.
Original entry on oeis.org
1, 1, 1, 5, 1, 1, 21, 6, 1, 1, 93, 25, 7, 1, 1, 421, 112, 29, 8, 1, 1, 1937, 510, 132, 33, 9, 1, 1, 9017, 2357, 606, 153, 37, 10, 1, 1, 42349, 11009, 2819, 709, 175, 41, 11, 1, 1, 200277, 51840, 13233, 3324, 819, 198, 45, 12, 1, 1
Offset: 0
Triangle begins:
1;
1, 1;
5, 1, 1;
21, 6, 1, 1;
93, 25, 7, 1, 1;
421, 112, 29, 8, 1, 1;
...
A126970
Triangle T(n,k), 0 <= k <= n, read by rows given by: T(0,0)=1, T(n,k)=0 if k < 0 or if k > n, T(n,0) = T(n-1,1), T(n,k) = T(n-1,k-1) + 3*T(n-1,k) + T(n-1,k+1) for k >= 1.
Original entry on oeis.org
1, 0, 1, 1, 3, 1, 3, 11, 6, 1, 11, 42, 30, 9, 1, 42, 167, 141, 58, 12, 1, 167, 684, 648, 327, 95, 15, 1, 684, 2867, 2955, 1724, 627, 141, 18, 1, 2867, 12240, 13456, 8754, 3746, 1068, 196, 21, 1, 12240, 53043, 61362, 43464, 21060, 7146, 1677, 260, 24, 1
Offset: 0
Triangle begins:
1;
0, 1;
1, 3, 1;
3, 11, 6, 1;
11, 42, 30, 9, 1;
42, 167, 141, 58, 12, 1;
167, 684, 648, 327, 95, 15, 1; ...
From _Philippe Deléham_, Nov 07 2011: (Start)
Production matrix begins:
0, 1
1, 3, 1
0, 1, 3, 1
0, 0, 1, 3, 1
0, 0, 0, 1, 3, 1
0, 0, 0, 0, 1, 3, 1
0, 0, 0, 0, 0, 1, 3, 1
0, 0, 0, 0, 0, 0, 1, 3, 1
0, 0, 0, 0, 0, 0, 0, 1, 3, 1 (End)
-
T[0, 0, x_, y_] := 1; T[n_, 0, x_, y_] := x*T[n - 1, 0, x, y] + T[n - 1, 1, x, y]; T[n_, k_, x_, y_] := T[n, k, x, y] = If[k < 0 || k > n, 0, T[n - 1, k - 1, x, y] + y*T[n - 1, k, x, y] + T[n - 1, k + 1, x, y]]; Table[T[n, k, 0, 3], {n, 0, 49}, {k, 0, n}] // Flatten (* G. C. Greubel, Apr 21 2017 *)
Showing 1-2 of 2 results.
Comments