save_result.m

来自「多元统计程序包」· M 代码 · 共 17 行

function save_result(h)
str = get(h.outputdata_listbox,'String');
if isempty(zcf_data)
    warndlg('输入数据有误，可能为空，可能数据矩阵有不合法的字符！', '警告！');
else
    [result_file, newpath] = uiputfile('result.mat', '保存数据文件名');
    %如果按'Cancel'按钮
    if isequal([result_file, newpath],[0 ,0])
        return
    else
        %创建文件名并保存
        File = fullfile(newpath, result_file);
        data = eval(str) 
        fieldnames(str)
        save(File,'str');
    end
end