基于MATLAB的TOPSIS法计算App pdist matlab

逼近理想解排序法(TOPSIS法)也称优劣解距离法，是多目标决策分析中一种常用的距离综合评价方法。基本思想是定义决策问题的理想解和负理想解，根据有限个评价对象与理想解的接近程度进行排序，找到最优方案。 正负理想解是一个方案集中并不存在的虚拟最佳、最劣方案。它的每个属性值都是决策矩阵中该属性的最好的值、最坏的值。

TOPSIS法（逼近理想解排序法）采用相对接近度来表征各个评价对象与参考点的距离。之前介绍了基于MATLAB的guide制作的TOPSIS法GUI计算界面，但是随着MATLAB版本的更新，之后的版本不再支持guide制作的GUI界面，因此我基于MATLAB App Designer将TOPSIS法修改成App，这样可以兼容2016之后的版本，也不受最新版本的限制。

基于MATLAB的TOPSIS法计算App如下：

点击导入数据按键——点击计算权重——在熵权法和变异系数法中选择一个方法计算权重，获得权重计算的权重excel文件——点击导入权重数据按键——点击开始计算——出现结果显示加载的数据表、每个指标对应的权重和每个个体的得分表——同时生成对应的数据结果exce文件：TOPSIS法得分表.xlsx和TOPSIS法指标权重.xlsx。需要完整App安装包的，可以进行打赏后截图（80元及以上），在微信公众号云龙派点击“联系掌门”按键进行联系，或者在公众号内回复截图，几小时内会回复。App编程不易，还请见谅！

1.界面举例计算

某个项目有四个公司竞标，分别给出了方案1-4，评审从以下6个方面对四个方案分别打分，具体结果如下，利用TOPSIS法求解方案的得分，求得最优方案。其中总价是负向指标，其他指标是正向指标。

Step1:点击TOPSIS.mlappinstall文件，在MATLAB中双击安装APP，点击安装到我的APP。

Step2:在APP 菜单栏中找到我的app中的TOPSIS，双击运行出App主界面。

Step3:点击导入数据，选择数据excel文件，并点击确定。

Step4:选择一种方法计算指标权重（例如选择变异系数法求权重，则点击相应的按键，跳转到Bianyixishufa界面）。

Step5:点击变异系数法求权重界面中的导入数据按键，并点击确定。

Step6:输入参数。

Step7:点击开始计算

Step8:点击关闭返回Topsis界面，点击导入权重数据按键，选择加载变异系数法计算指标权重.xlsx，并点击确定。

Step9:点击开始计算。

Step10:点击清除按键和关闭按键可以清除输入和关闭App。选择熵权法求权重步骤类似。

2.App部分程序如下

   function Button_7Pushed(app, event)
            global data
            xdata = data;
            [score,w] = shangquanfa(xdata);
            xlswrite('熵权法计算指标权重.xlsx',w);
        end


        % Button pushed function: Button_10
        function Button_10Pushed(app, event)
            app.TabGroup.SelectedTab = app.ShangquanfaTab;
        end


        % Button pushed function: Button_14
        function Button_14Pushed(app, event)
            app.TabGroup.SelectedTab = app.BianyixishufaTab;
        end


        % Button pushed function: Button_8
        function Button_8Pushed(app, event)
            global data
            [filename,pathname,filterindex]=uigetfile({'*.xlsx';'*.xls';'*.*'},'打开数据');
            if ~filename
                return;
            end
            str1=[pathname,filename];
            if (filename==0 & pathname==0)
                msgbox('您没有选择文件，请重新选择!','打开文件出错','error');
            else
                data=xlsread (strcat([pathname filename]));
                msgbox('打开及读取数据完毕!','确认','warn');
            end
        end


        % Button pushed function: Button_9
        function Button_9Pushed(app, event)
            global weight
            [filename,pathname,filterindex]=uigetfile({'*.xlsx';'*.txt';'*.*'},'打开数据');
            if ~filename
                return;
            end
            str1=[pathname,filename];
            if (filename==0 & pathname==0)
                msgbox('您没有选择文件，请重新选择!','打开文件出错','error');
            else
                weight=xlsread (strcat([pathname filename]));
                msgbox('打开及读取数据完毕!','确认','warn');
            end
        end


        % Button pushed function: Button_12
        function Button_12Pushed(app, event)
            dataini = [];
            app.UITable_4.Data = dataini;
            app.UITable_5.Data = dataini;
            app.UITable_6.Data = dataini;
        end


        % Button pushed function: Button_13
        function Button_13Pushed(app, event)
            closereq;
        end

本文内容来源于网络，仅供参考学习，如内容、图片有任何版权问题，请联系处理，24小时内删除。

作 者 | 郭志龙

编 辑 | 郭志龙
校 对 | 郭志龙