莱依特准则实现误差剔除

function [data_afterlon_afterlat_after] = PauTa（data_originallon_originallat_original）
%  Name   拉依达准则坏值剔除
%  Time   2016.4.25
%  Author 刘玄
%  Desri  输入原始测量数据，根据拉依达准侧剔除坏值，返回一次剔除坏值之后的数据
%  Note   程序入口：输入：原始数据，输出：一次拉依达准则处理之后的数据
u=mean（data_original）;
sigma=std（data_original）;
len=length（data_original）;
j=1;
data_index=[];
for