asa144, a FORTRAN90 code which generates a random RxC contingency table, by James Boyett.
The code is Applied Statistics Algorithm 144.
The code accepts a table shape (the number of rows and columns), and two vectors, the lists of row and column sums. There may be 0, 1, or many tables with nonnegative, integral entries that have the given shape and sums. The program will generate, at random, one of the tables and return it. Repeated calls to the program will return new random selections.
For example, suppose M = 2, N = 3, row sum = (/ 6, 5 /) and column sum = (/ 3, 4, 4 /), then here are two tables that satisfy the constraints:
1 2 3 2 2 1and
3 0 3 0 4 1
The computer code and data files described and made available on this web page are distributed under the GNU LGPL license.
asa144 is available in a C version and a C++ version and a FORTRAN90 version and a MATLAB version.
ASA159, a FORTRAN90 routine which randomly generates an RxC contingency table.
ASA205, a FORTRAN90 code which generates all the contingency tables corresponding to a given set of row and column sums.
SUBSET, a FORTRAN90 code which includes a routine called IMAT_01_ROWCOLSUM which generates a (0,1) matrix with given row and column sums.
Original FORTRAN77 version by James Boyett; FORTRAN90 version by John Burkardt.