OFFSET
0,5
COMMENTS
Row sums are 1,2,4,4,4,0,-9,-30,-72,-154,-308,...
EXAMPLE
1;
1, 1;
1, 2, 1;
1, 1, 1, 1;
1, 1, 0, 1, 1;
1, 0, -1, -1, 0, 1;
1, -1, -3, -3, -3, -1, 1;
1, -3, -6, -7, -7, -6, -3, 1;
1, -6, -11, -13, -14, -13, -11, -6, 1;
1, -11, -19, -23, -25, -25, -23, -19, -11, 1;
1, -19, -32, -39, -43, -44, -43, -39, -32, -19, 1;
MATHEMATICA
L[n_, m_] = Fibonacci[m] + Fibonacci[n - m] - (Fibonacci[0] + Fibonacci[n]) + 1;
Table[Table[L[n, m], {m, 0, n}], {n, 0, 10}];
Flatten[%]
CROSSREFS
KEYWORD
AUTHOR
Roger L. Bagula and Gary W. Adamson, Apr 07 2010
STATUS
approved