cp's OEIS Frontend

A205552 Square array: C(max(2i-2,j-1),min(2i-2,j-1)), i>=1, j>=1; by antidiagonals.

%I A205552 #6 Mar 30 2012 18:58:11
%S A205552 1,1,1,1,2,1,1,1,4,1,1,3,6,6,1,1,6,4,15,8,1,1,10,1,20,28,10,1,1,15,5,
%T A205552 15,56,45,12,1,1,21,15,6,70,120,66,14,1,1,28,35,1,56,210,220,91,16,1,
%U A205552 1,36,70,7,28,252,495,364,120,18,1,1,45,126,28,8,210,792,1001
%N A205552 Square array: C(max(2i-2,j-1),min(2i-2,j-1)), i>=1, j>=1; by antidiagonals.
%e A205552 Northwest corner:
%e A205552 1....1....1....1....1
%e A205552 1....2....1....3....6
%e A205552 1....4....6....4....1
%e A205552 1....6....15...20...15
%e A205552 1....8....28...56...70
%t A205552 f[i_, j_] := Binomial[Max[2 i - 2, j - 1], Min[2 i - 2, j - 1]]
%t A205552 TableForm[Table[f[i, j], {i, 1, 10}, {j, 1, 10}]]
%t A205552 Flatten[Table[f[i, n + 1 - i], {n, 1, 14}, {i, 1, n}]]
%Y A205552 Cf. A205456.
%K A205552 nonn,tabl
%O A205552 1,5
%A A205552 _Clark Kimberling_, Jan 28 2012