function xdat = xdec(n,left,right) 
% XDEC, Creates a grid of x's (col vector)
%     with a decreasing Beta density
%     For use in NonParametric Regression MOVies

%    Copyright (c) J. S. Marron and E. K. Smith, 1999

rand('seed',63839971) ;
xdat = rand(n,1).^(2/3) ;
          %  Increasing density data on [0,1]
xdat = 1 - xdat ;
          %  Decreasing density data on [0,1]
xdat = left + (right - left) * xdat ;
          %  transform to given interval

