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

%*****************************************************************************80
%
%% r8row_uniform_abvec() fills an R8ROW with scaled pseudorandom numbers.
%
%  Discussion:
%
%    An R8ROW is an array of R8 values, regarded as a set of row vectors.
%
%    The user specifies a minimum and maximum value for each column.
%
%  Licensing:
%
%    This code is distributed under the MIT license.
%
%  Modified:
%
%    15 January 2012
%
%  Author:
%
%    John Burkardt
%
%  Input:
%
%    integer M, N, the number of rows and columns in the array.
%
%    real A(N), B(N), the lower and upper limits.
%
%  Output:
%
%    real X(M,N), the array of pseudorandom values.
%
  x = rand ( m, n );
  for j = 1 : n
    x(1:m,j) = a(j) + ( b(j) - a(j) ) * x(1:m,j);
  end

  return
end
