cp's OEIS Frontend

A059674 Square array a(m,n) = binomial(max(m,n), min(m,n)) (m>=0, n>=0) read by antidiagonals.

%I A059674 #17 Aug 18 2015 12:29:02
%S A059674 1,1,1,1,1,1,1,2,2,1,1,3,1,3,1,1,4,3,3,4,1,1,5,6,1,6,5,1,1,6,10,4,4,
%T A059674 10,6,1,1,7,15,10,1,10,15,7,1,1,8,21,20,5,5,20,21,8,1,1,9,28,35,15,1,
%U A059674 15,35,28,9,1,1,10,36,56,35,6,6,35,56,36,10,1,1,11,45,84,70,21,1,21,70,84
%N A059674 Square array a(m,n) = binomial(max(m,n), min(m,n)) (m>=0, n>=0) read by antidiagonals.
%H A059674 T. D. Noe, <a href="/A059674/b059674.txt">Rows n = 0..100 of triangle, flattened</a>
%F A059674 Square array equals A007318 + transpose(A007318) - I, where I denotes the infinite identity matrix. - _Peter Bala_, Aug 11 2015
%e A059674 a(2,4) = binomial(max(2,4), min(2,4)) = binomial(4,2) = 6.
%e A059674 Square begins:
%e A059674 1 1 1 1 1 1 ...
%e A059674 1 1 2 3 4 5 ...
%e A059674 1 2 1 3 6 10...
%e A059674 1 3 3 1 4 10 ...
%t A059674 a[m_, n_] := If[m >= n, Binomial[m, n], Binomial[n, m]]; Table[a[m-n, n], {m, 0, 12}, {n, 0, m}] // Flatten (* _Jean-François Alcover_, Oct 10 2012 *)
%Y A059674 Cf. A007318.
%K A059674 easy,nice,nonn,tabl
%O A059674 0,8
%A A059674 _Fabian Rothelius_, Feb 05 2001
%E A059674 More terms from Larry Reeves (larryr(AT)acm.org), Feb 06 2001