function yi=New_Int(x,y,xi)
n=length(x);
m=length(y);
if n~=m
    error('The lengths of X and Y must be equal');
    return;
end
Y=zeros(n);
Y(:,1)=y';
for k=1:n-1]
    if abs(x(i+k)-x(i))<eps
        error('the DATA is error');
......................