24小时热门版块排行榜    

查看: 2455  |  回复: 1

ldiny

新虫 (小有名气)

[求助] SI模型病毒扩散程序问题求助 已有1人参与

小弟最近在做SI模型下的病毒扩散,因为使用的是图的广度优先原则来进行扩散,即一次只能是一个节点在进行扩散。实际上,每个被感染的节点都会同时向周围扩散,请问如下的代码逻辑该怎么改?为什么出来的结果不是我想要的结果。

  %记录以当前节点作为传播源的开始时间
      t1=cputime;                  

%按照图的广度优先的原则来进行病毒传播
function [practiceTime,infection]=BFSspreading(A,N,source_infection_node,irate,rrate,susceptible,infection,recover,time_gap,t1,obesever)  
%初始化队列
%队列头
head=1;
%队列尾,开始队列为空,tail==head
tail=1;   
%向头中加入感染源节点
queue(head)=source_infection_node;
%队列扩展 .这样保证头在右边,队尾在左边了
head=head+1;

%开始按照广度优先搜索顺序向邻居节点传播
%判断队列是否为空
while tail~=head
    %记录当前已经经过了多少传播结束时间
    t2=cputime;
    if (t2-t1)>time_gap
        tail=head;
    end      
    %取队尾节点
    i=queue(tail);  
    %如果该节点不在移除列表之中
    if isempty(find(recover==i,1))
       for j=1:N
             %如果节点j与当前节点i相连并且节点j不在感染列表和恢复列表中,即节点j与当前节点i相连,并且还没有被感染过
            if A(i,j)==1 && isempty(find(infection==j,1)) && isempty(find(recover==j,1))
                                             
                  %以一定的概率向周围传播
                 infection_random=rand(1);
                 if infection_random < irate
                    %新节点入列
                    queue(head)=j;  
                    %扩展队列
                    head=head+1;   
                    %将新节点j加入感染列表
                    infection=[infection j];
                    
                    %从易感染节点列表中删除该节点,设置为-1
                    [row,col,v] = find(susceptible==j) ;                  
                    susceptible(col)=-1;
                    susceptible(find(susceptible==-1))=[];                  
                 end
            end
       end      
      
        tail=tail+1;         
    end %end if  isempty(find(recover==i,1)
end %end while
end
回复此楼
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

非良人

新虫 (初入文坛)

【答案】应助回帖

您试着下载一下这个链接的工具箱,里面有关于SI SIR SIS模型的相关程序,希望可以帮到你
https://blog.csdn.net/u013408431/article/details/53942784
2楼2018-08-19 21:30:44
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
相关版块跳转 我要订阅楼主 ldiny 的主题更新
最具人气热帖推荐 [查看全部] 作者 回/看 最后发表
[博后之家] 售SCI文章,我:8O.5.5.1O.54,科目全,可十急 +3 gy1nBQXYQJqL 2026-08-29 5/250 2026-08-29 21:22 by 4qO8zhfjr2AX
[论文投稿] 售一区SCI文章T0P,我:8O.551.O54,科目全,可十急 +3 gy1nBQXYQJqL 2026-08-29 5/250 2026-08-29 21:11 by 4qO8zhfjr2AX
[基金申请] 面上意见出来了 +8 黄鸟于飞Chao 2026-08-29 16/800 2026-08-29 20:45 by 黄鸟于飞Chao
[基金申请] 投票:  有多少人是今天查系统知道结果的? +16 爱看书的可乐 2026-08-26 18/900 2026-08-29 20:07 by winsaint
[考研] 售SCI一区文章,我:8.O.55.1.O.54,科目齐全,可伽急 +3 G6APbkg8SA6w 2026-08-29 3/150 2026-08-29 18:59 by 4FFAWE8HcgUD
[公派出国] 售SCI一区T0P文章,我:8.O.55.1.O.5.4,科目全,可+急 +3 ASdOkHsho7FD 2026-08-28 4/200 2026-08-29 14:02 by jCd0dEvKHShX
[论文投稿] 售SCI一区T0P文章,我:8.O55.1.O.54,科目全,可十急 +3 ASdOkHsho7FD 2026-08-28 4/200 2026-08-29 13:51 by jCd0dEvKHShX
[教师之家] 售SCI一区T0P文章,我:8.O.55.1.O54,科目全,可伽急 +4 ASdOkHsho7FD 2026-08-28 5/250 2026-08-29 11:49 by jCd0dEvKHShX
[基金申请] 中青基了要发朋友圈吗? +3 349506619 2026-08-28 3/150 2026-08-29 10:49 by 木风9012
[基金申请] 国自然评审意见 +13 wangmingqi 2026-08-28 19/950 2026-08-29 10:22 by Poppy1104
[基金申请] 怎么查啊 +6 huang1991js 2026-08-26 6/300 2026-08-28 08:42 by winsaint
[基金申请] 申请删除本帖 +6 lyz123lyz 2026-08-27 7/350 2026-08-27 17:31 by 宁静致远sy
[文学芳草园] 梦想 +3 myrtle 2026-08-26 3/150 2026-08-27 10:01 by angelyueyi
[基金申请] 为什么国自然不能直接公布 +4 bjdxyxy 2026-08-26 4/200 2026-08-26 13:12 by qingmu1201
[基金申请] 国际合作可查了,中了面上 (EPI+1)(金币+50) +18 Ldrop2023 2026-08-26 18/900 2026-08-26 11:15 by cmrandy
[基金申请] 今天务委会开完了,明天出结果吗 +19 angus9576 2026-08-25 23/1150 2026-08-26 10:03 by zp519
[基金申请] 在坚冰还盖着北海的时候,我看到了怒放的梅花。 (金币+10) +6 ziyangfang 2026-08-25 9/450 2026-08-25 20:26 by huagongfeihu
[基金申请] 明天应该可查了!? +6 chengyan1220 2026-08-23 6/300 2026-08-25 19:45 by zfd97
[基金申请] 某些机构,以效率低为荣,以效率低作为存在感 +9 yuleib84 2026-08-25 10/500 2026-08-25 17:14 by alexon
[基金申请] 如果此刻你正在为国基感到焦虑,不妨来听听这首《基金之外》 +8 scalable 2026-08-24 8/400 2026-08-25 12:52 by jnhyjjm
信息提示
请填处理意见