|
|
EDA365欢迎您登录!
您需要 登录 才可以下载或查看,没有帐号?注册
x
S=1400050000;%中国人口总数
* A5 _4 c' _4 R7 @E=79852;%潜伏者
2 m/ n) Z: A! ~I=10462;%未接受隔离的感染者
+ {# Z, _5 q5 u/ P% II1=10462+7795+5000;/ Z( r2 H' G3 Q
Sq=25000;%尚在接受医学观察的人数# A4 P" ^0 R5 p0 m( G! N" W
Eq=5000;%估计值,为正在被隔离的潜伏者
. V3 W# t. f2 @. Z. w" J% D8 `' iH=7795;%正在住院的患者,为感染者和被隔离的潜伏者之和
5 K, |3 A" C( T' k% f& N0 DR=263;%康复者人数+ R2 k+ V2 S: U4 v3 d- V0 w
R1=263;%官方公布出院人数
7 I* \1 }2 p& c: yD=218;%死亡人数9 @. ]# F, U) L
%模型参数设定: o" ]) ~9 L0 W& z8 \
delta=0.9;%感染者的隔离速度8 `* `) o9 }0 w2 H
gamma=1/14;%隔离易感者转化为易感者概率 y+ w! o5 `5 X$ z% a
gammaH=0.02;%隔离感染者的恢复速率& B$ C& \; g! o+ d9 s0 x6 @
gammaI=0.001;%感染者恢复率
& M: F; }$ u6 H* u0 Y* x. H$ mbeta=1/1.4*10^(-9);%传染概率
0 Z1 d6 u) I j5 E: qsigma=1/7;%潜伏者向感染者的转化速度,平均潜伏期为7天,为7天的倒数
9 ?3 Z3 n$ I2 S; ~d=0.03;%死亡率- q; I8 }0 [2 S( h- o( q( ?2 f
%差分迭代方程/ W# [. f2 o8 k/ ^( ^0 J0 @/ m
T=1:100;
) \9 @, Z7 C, pfor i=1:length(T)-1
2 `+ X) p, m1 |8 e3 i8 u' A S(i+1)=S(i)-(I(i)+E(i))*beta*S(i)+gamma*Sq(i);%易感人数迭代1 C) l2 X/ {+ z3 I O+ _' L9 r
E(i+1)=E(i)+beta*S(i)*(I(i)+E(i))-sigma*E(i);%潜伏者人数迭代* L$ X( x0 P2 n" b# Y
I(i+1)=I(i)+sigma*E(i)-(delta+d+gammaI)*I(i);%感染者人数迭代! J& I* ~% K; h* n* E
I1(i+1)=I1(i)+sigma*E(i);%感染总人数% E& E) w4 a3 ^: B" T& E% R7 q
Sq(i+1)=Sq(i)+beta*S(i)*(I(i)+E(i))-gammaI*Sq(i);%隔离易感染着人数迭代
7 B1 D, r3 _% B$ r+ l5 g Eq(i+1)=Eq(i)+beta*S(i)*(I(i)+E(i))-sigma*Eq(i);%隔离潜伏者人数迭代
* @4 i' H6 ]) p# A" e4 Z H(i+1)=H(i)+gammaI*I(I)+sigma*Eq(i)-(d+gammaH)*H(i);%住院患者人数迭代
0 _+ D7 A) S4 r; i( x, o; _ x R(i+1)=R(i)+gammaH*H(i)+gammaI*I(i);%康复人数迭代
. \$ Q. _/ w! P/ K) J# F R1(i+1)=R1(i)+gammaI*I(i)+gammaH*H(i);%官方公布治愈人数迭代
7 B: }2 J* e4 d6 I* } D(i+1)=D(i)+I(i)*d;%死亡人数迭代" J1 O% f4 g6 t% o6 i
end
8 v* F- m7 N, P# z! p! l没有显示哪里出现错误,只说了标题这句话,求大神告知2 y& G0 b& y9 K! z
|
|