login

Reminder: The OEIS is hiring a new managing editor, and the application deadline is January 26.

Triangular array: T(n,k)=C(n+4,k)+C(n+4,k+4), 0<=k<=n.
3

%I #6 Mar 30 2012 18:57:40

%S 2,6,6,16,12,16,36,28,28,36,71,64,56,64,71,127,135,120,120,135,127,

%T 211,262,255,240,255,262,211,331,473,517,495,495,517,473,331,496,804,

%U 990,1012,990,1012,990,804,496,716,1300,1794,2002,2002,2002,2002

%N Triangular array: T(n,k)=C(n+4,k)+C(n+4,k+4), 0<=k<=n.

%e Northwest corner:

%e 2

%e 6...6

%e 16..12..16

%e 36..28..28..36

%e 71..64..56..64..71

%t T[n_, k_] := Binomial[n + 4, k] + Binomial[n + 4, k + 4]

%t Flatten[Table[T[n, k], {n, 0, 10}, {k, 0, n}]]

%t (* A194120 as a sequence *)

%t TableForm[Table[T[n, k], {n, 0, 10}, {k, 0, n}]]

%t (* A194120 as an array *)

%Y Cf. A194118, A194119.

%K nonn,tabl

%O 0,1

%A _Clark Kimberling_, Aug 16 2011