deletedata.m

来自「matlab 电子测量 包括误差分析的很多函数」· M 代码 · 共 19 行

function [y,n]=deletedata(x,x2)
[a,b]=size(x);
n=b-1;
y=ones(1,n);
k=find(x==x2);
if k==1
    for i=1:n
        y(i)=x(i+1);
    end
else
    for i=1:k-1
        y(i)=x(i);
    end
    for i=k:n
        y(i)=x(i+1);
    end
end