|
EDA365欢迎您登录!
您需要 登录 才可以下载或查看,没有帐号?注册
x
S=1400050000;%中国人口总数
: b/ U0 O% k z6 W- tE=79852;%潜伏者
! O+ A' b0 q; B7 `I=10462;%未接受隔离的感染者
N# m+ O! P0 `& sI1=10462+7795+5000;5 k6 K5 Y9 ], R; N; R) ^
Sq=25000;%尚在接受医学观察的人数
# U6 ^% t% M+ h% \4 S. eEq=5000;%估计值,为正在被隔离的潜伏者3 o) S+ E% P) O3 I+ `( N4 j, \
H=7795;%正在住院的患者,为感染者和被隔离的潜伏者之和. _. d* ^% |2 A3 S& }# h
R=263;%康复者人数
* Q5 C' F# z/ G; G/ F: OR1=263;%官方公布出院人数
) x2 v9 o _$ R3 U1 d" oD=218;%死亡人数7 a$ f5 v9 r; b2 ^6 Z4 I1 {
%模型参数设定
+ e* {8 Z7 a. ]+ o9 A: P: T4 kdelta=0.9;%感染者的隔离速度
( i' q; G3 m: T+ e1 cgamma=1/14;%隔离易感者转化为易感者概率
6 Q. _; g: X( @. U" Y( fgammaH=0.02;%隔离感染者的恢复速率
* r$ J7 R! G! g. J9 H# SgammaI=0.001;%感染者恢复率. ?5 l9 u7 W2 J4 B8 i
beta=1/1.4*10^(-9);%传染概率9 I$ o) A$ f0 y3 Z: o, A
sigma=1/7;%潜伏者向感染者的转化速度,平均潜伏期为7天,为7天的倒数8 X1 B' ?& t S! d
d=0.03;%死亡率
8 X% A* D4 Y* m! p%差分迭代方程
. @4 q! Z# x/ p( o8 l; `# aT=1:100;+ i- ~, P S* C- t# `: o- r7 V
for i=1:length(T)-1
; e! b* b6 {. S S(i+1)=S(i)-(I(i)+E(i))*beta*S(i)+gamma*Sq(i);%易感人数迭代# c9 M3 k8 {6 i; g, D- Z
E(i+1)=E(i)+beta*S(i)*(I(i)+E(i))-sigma*E(i);%潜伏者人数迭代
( U" W3 g; V( P I(i+1)=I(i)+sigma*E(i)-(delta+d+gammaI)*I(i);%感染者人数迭代
# O; @' ?# o! o7 r$ f I1(i+1)=I1(i)+sigma*E(i);%感染总人数) f6 X( d0 X' F4 y! s
Sq(i+1)=Sq(i)+beta*S(i)*(I(i)+E(i))-gammaI*Sq(i);%隔离易感染着人数迭代
7 v+ q% w8 k7 t( k Eq(i+1)=Eq(i)+beta*S(i)*(I(i)+E(i))-sigma*Eq(i);%隔离潜伏者人数迭代
! {/ i1 {' S" n. r H(i+1)=H(i)+gammaI*I(I)+sigma*Eq(i)-(d+gammaH)*H(i);%住院患者人数迭代
) w$ L$ w& |9 {3 [ e R(i+1)=R(i)+gammaH*H(i)+gammaI*I(i);%康复人数迭代
0 Z! s1 p! i, x R1(i+1)=R1(i)+gammaI*I(i)+gammaH*H(i);%官方公布治愈人数迭代
. V r2 P3 s+ X3 [# p7 x, s D(i+1)=D(i)+I(i)*d;%死亡人数迭代+ x9 r% w& M# r* J9 B
end
1 }& I; I* }7 q1 `没有显示哪里出现错误,只说了标题这句话,求大神告知
+ w4 s7 u8 I* o |
|