OFFSET
1,2
FORMULA
Even columns (offset) = 1, 2, 3, ...; while odd columns = 3, 6, 9, ...
T(i,j) = i-j+1 if j <= i and j is odd; 3(i-j+1) if j <= i and j is even. - Emeric Deutsch, Mar 23 2005
EXAMPLE
First few rows of the triangle:
1;
2, 3;
3, 6, 1;
4, 9, 2, 3;
...
MAPLE
T:=proc(i, j) if j>i then 0 elif j mod 2 = 1 then i-j+1 else 3*(i-j+1) fi end:for i from 1 to 14 do seq(T(i, j), j=1..i) od; # yields sequence in triangular form # Emeric Deutsch, Mar 23 2005
MATHEMATICA
Q[i_, j_] := If[j <= i, 2 + (-1)^j, 0];
R[i_, j_] := If[j <= i, 1, 0];
T[i_, j_] := Sum[R[i, k]*Q[k, j], {k, 1, 13}];
Table[T[i, j], {i, 1, 13}, {j, 1, i}] // Flatten (* Jean-François Alcover, Jul 24 2024~ *)
CROSSREFS
KEYWORD
nonn,tabl
AUTHOR
Gary W. Adamson, Mar 16 2005
EXTENSIONS
More terms from Emeric Deutsch, Mar 23 2005
STATUS
approved