function x = r8vec_blend ( n, t1, x1, t2, x2 )

%*****************************************************************************80
%
%% r8vec_blend() interpolates an R8VEC, given two vectors and weight factors.
%
%  Discussion:
%
%    x(i) = t1 * x1(i) + t2 * x2(i)
%    Usually, T1 + T2 = 1.
%
%  Licensing:
%
%    This code is distributed under the MIT license.
%
%  Modified:
%
%    24 April 2005
%
%  Author:
%
%    John Burkardt
%
%  Input:
%
%    integer N, the number of entries in each  vector.
%
%    real T1, the weight factor for vector 1.
%
%    real X1(N), the first vector.
%
%    real T2, the weight factor for vector 2.
%
%    real X2(N), the second vector.
%
%  Output:
%
%    real X(N), the interpolated or extrapolated value.
%
  x(1:n) = t1 * x1(1:n) + t2 * x2(1:n);

  return
end
