|
|
A157897
|
|
Triangle read by rows, T(n,k) = T(n-1,k) + T(n-2,k-1) + T(n-3,k-3) + delta(n,0)*delta(k,0), T(n,k<0) = T(n<k,k) = 0.
|
|
13
|
|
|
1, 1, 0, 1, 1, 0, 1, 2, 0, 1, 1, 3, 1, 2, 0, 1, 4, 3, 3, 2, 0, 1, 5, 6, 5, 6, 0, 1, 1, 6, 10, 9, 12, 3, 3, 0, 1, 7, 15, 16, 21, 12, 6, 3, 0, 1, 8, 21, 27, 35, 30, 14, 12, 0, 1, 1, 9, 28, 43, 57, 61, 35, 30, 6, 4, 0, 1, 10, 36, 65, 91, 111, 81, 65, 30, 10, 4, 0, 1, 11, 45, 94, 142, 189, 169, 135, 90, 30, 20, 0, 1
(list;
table;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
0,8
|
|
COMMENTS
|
T(n, k) is the number of tilings of an n-board that use k (1/2, 1)-fences and n-k squares. A (1/2, 1)-fence is a tile composed of two pieces of width 1/2 separated by a gap of width 1. (Result proved in paper by K. Edwards - see the links section.) - Michael A. Allen, Apr 28 2019
T(n, k) is the (n, n-k)-th entry in the (1/(1-x^3), x*(1+x)/(1-x^3)) Riordan array. - Michael A. Allen, Mar 11 2021
|
|
LINKS
|
|
|
FORMULA
|
T(n,k) = T(n-1,k) + T(n-2,k-1) + T(n-3,k-3) + delta(n,0)*delta(k,0), T(n,k<0) = T(n<k,k) = 0.
T(n, k) = T(n-1, k) + T(n-2, k-1) + T(n-3, k-3), with T(n, 0) = 1.
Sum_{k=0..floor(n/2)} T(n-k, k) = A120415(n). (End)
|
|
EXAMPLE
|
First few rows of the triangle are:
1;
1, 0;
1, 1, 0;
1, 2, 0, 1;
1, 3, 1, 2, 0;
1, 4, 3, 3, 2, 0;
1, 5, 6, 5, 6, 0, 1;
1, 6, 10, 9, 12, 3, 3, 0;
1, 7, 15, 16, 21, 12, 6, 3, 0;
1, 8, 21, 27, 35, 30, 14, 12, 0, 1;
...
T(9,3) = 27 = T(8,3) + T(7,2) + T(6,0) = 16 + 10 + 1.
|
|
MATHEMATICA
|
T[n_, k_]:= If[n<k || k<0, 0, T[n-1, k]+T[n-2, k-1]+T[n-3, k-3]+KroneckerDelta[n, k, 0]];
Flatten[Table[T[n, k], {n, 0, 14}, {k, 0, n}]] (* Michael A. Allen, Apr 28 2019 *)
|
|
PROG
|
(Magma)
if k lt 0 or k gt n then return 0;
elif k eq 0 then return 1;
else return T(n-1, k) + T(n-2, k-1) + T(n-3, k-3);
end if; return T;
end function;
[T(n, k): k in [0..n], n in [0..14]]; // G. C. Greubel, Sep 01 2022
(SageMath)
if (k<0 or k>n): return 0
elif (k==0): return 1
else: return T(n-1, k) + T(n-2, k-1) + T(n-3, k-3)
flatten([[T(n, k) for k in (0..n)] for n in (0..14)]) # G. C. Greubel, Sep 01 2022
|
|
CROSSREFS
|
|
|
KEYWORD
|
|
|
AUTHOR
|
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|