A195662 Triangle T(n,k) read by rows: T(0,0)= -3, T(1,0)= 2, T(1,1) = 0 and T(n,k) = T(n-1,k) -T(n-2,k-2) otherwise.
-3, 2, 0, 2, 0, 3, 2, 0, 1, 0, 2, 0, -1, 0, -3, 2, 0, -3, 0, -4, 0, 2, 0, -5, 0, -3, 0, 3, 2, 0, -7, 0, 0, 0, 7, 0, 2, 0, -9, 0, 5, 0, 10, 0, -3, 2, 0, -11, 0, 12, 0, 10, 0, -10, 0, 2, 0, -13, 0, 21, 0, 5, 0, -20, 0, 3, 2, 0, -15, 0, 32, 0, -7, 0, -30, 0, 13, 0
Offset: 0
Examples
The first few rows are -3; 2, 0; 2, 0, 3; 2, 0, 1, 0; 2, 0, -1, 0, -3; 2, 0, -3, 0, -4, 0; 2, 0, -5, 0, -3, 0, 3; 2, 0, -7, 0, 0, 0, 7, 0; 2, 0, -9, 0, 5, 0, 10, 0, -3; 2, 0, -11, 0, 12, 0, 10, 0, -10, 0; 2, 0, -13, 0, 21, 0, 5, 0, -20, 0, 3;
Programs
-
Mathematica
p = -3; q = 2; t[0, 0] = p; t[, 0] = q; t[, ?OddQ] = 0; t[n, k_] /; k > n = 0; t[n_ /; n >= 0, k_ /; k >= 0] := t[n, k] = t[n-1, k] - t[n-2, k-2]; Table[t[n, k], {n, 0, 11}, {k, 0, n}] // Flatten (* Jean-François Alcover, Nov 27 2012 *)
Comments