delete_data.m

主成分分析和偏最小二乘SquaresPrincipal成分分析（ PCA ）和偏最小二乘（ PLS ）

function delete_data;
% DELETE_DATA remove data from Lab432
%
% last modified 28.08.07


global TS GSD_GLOBALS

str=TS.name;

[selection,ok] = listdlg('PromptString','Select data to delete:',...
                'SelectionMode','multiple','ListString',str);
            
if ok
    for i=length(selection):-1:1
        TS.data(:,selection(i))=[];
        TS.name(selection(i))=[];
    end
    if isempty(TS.data)
      	set(findobj('tag','MainFig'),'name','Lab432');
        GSD_GLOBALS.en_dis.datapresent=0;
        gui_en_dis;
    end
end