|
%I #10 Sep 23 2019 05:33:50
%S 1,3,39,4079,5442547,135029200594,85864898797026630,
%T 1831628658711424019558504,1644974303630818355119787542346815,
%U 75615488905118998567211473141942014485626339
%N Number of (n^2) X n binary arrays with rows in nonincreasing order and n ones in every column.
%e All solutions for 4X2
%e ..1..1....1..0....1..1
%e ..1..1....1..0....1..0
%e ..0..0....0..1....0..1
%e ..0..0....0..1....0..0
%t A188392 = Cases[Import["https://oeis.org/A188392/b188392.txt", "Table"], {_, _}][[All, 2]];
%t a[n_] := A188392[[2 n^2 - 2 n + 1]];
%t Table[a[n], {n, 1, 10}] (* _Jean-François Alcover_, Sep 23 2019 *)
%Y Main diagonal of A188392.
%K nonn
%O 1,2
%A _R. H. Hardin_, Mar 30 2011
%E More terms from _Jean-François Alcover_, Sep 23 2019
| 