基本信息

---

下载

   友情提示：（无需注册或充值，赞助后即可获取资源下载链接）

---

     嘿，亲！知识可是无价之宝呢，但咱这精心整理的资料也耗费了不少心血呀。小小地破费一下，绝对物超所值哦！如有下载和支付问题，请联系我们QQ(微信同号)：813200300

本次赞助数额为： 2 元　

支付宝支付

微信支付

   源码介绍

---

实例为针对一个邻接矩阵计算可达矩阵，并对可达矩阵进行层级划分，建立针对领接矩阵各个要素的解释结构模型代码。

解释结构模型代码，计算可达矩阵-分层

function [RS,dd,R]=get_RS(R)
[n,~]=size(R);
dd=[];
for i=1:n
    s1=find(R(i,:)==1);
    s2=find(R(:,i)==1)';
    s3=s1(ismember(s1,s2));
    RS{i,1}=s1;
    RS{i,2}=s2;
    RS{i,3}=s3;
    if isequal(s1,s3)
        RS{i,4}=1;
        dd=[dd,s3];
    else
        RS{i,4}=0;
    end
end

dd=unique(dd);
dds=sort(dd,'descend');
for i=1:length(dds)
    R(dds(i),:)=-1;
    R(:,dds(i))=-1;
end