function x = r8col_uniform_abvec ( m, n, a, b )

%*****************************************************************************80
%
%% r8col_uniform_abvec() fills an R8COL with scaled pseudorandom numbers.
%
%  Discussion:
%
%    An R8COL is an M by N array of R8's, regarded as an array of N columns,
%    each of length M.
%
%    The user specifies a minimum and maximum value for each row.
%
%  Licensing:
%
%    This code is distributed under the MIT license.
%
%  Modified:
%
%    19 December 2011
%
%  Author:
%
%    John Burkardt
%
%  Input:
%
%    integer M, N, the number of rows and columns in
%    the array.
%
%    real A(M), B(M), the lower and upper limits.
%
%  Output:
%
%    real X(M,N), the array of pseudorandom values.
%
  x = rand ( m, n );
  for i = 1 : m
    x(i,1:n) = a(i) + ( b(i) - a(i) ) * x(i,1:n);
  end

  return
end
