This study conducts a rigorous mathematical analysis of six SIR models tailored to elucidate the intricate dynamics of COVID-19 transmission, disease fatality, and the pivotal role of vaccination. Our SIR-based models offer comprehensive insights into the evolution of the pandemic over time, shedding light on the potential outcomes of disease persistence or eradication. With a strong emphasis on the impact of vaccination, we explore how varying levels of immunization influence the prevalence of COVID-19.
​
Furthermore, our research delves into the critical threshold required to attain herd immunity and quantifies the essential vaccination coverage needed to effectively curtail the spread of the virus. Crucially, we address the temporal aspect of vaccination-induced immunity, investigating scenarios where immunity may wane or ultimately fade away.
Let us consider a sufficiently large constant size of population
N
, and assume that births and
natural deaths are equal . Also newborns and all people of different ages are susceptible.
We assume that each individual of the total population is either susceptible, infectious or recovered from the disease with life - long immunity.
In[]:=
In SIR model, there is no difference between those who are recovered and those who are died; all of them are kept into compartment
R(t)
.
In this model, assumes that the population is homogeneous and there is no vital dynamics, that is, the total
population remains constant.
The highest R0 for the variants Alpha (1.22), Beta (1.19), Gamma (1.21), Delta (1.38) and Omicron (1.90) were reported from Japan, Belgium, the United States, France and South Africa, respectively . Nine out of ten epidemic curves with the highest estimated growth rates and reproduction numbers were due to the Omicron variant indicating the highest transmissibility .[1]
In[]:=
Clear["Global`*"]
In[]:=
betaSoln=First@Solve
ℜ
0

β
γ
,β
Out[]=
{βγ
ℜ
0
}
In[]:=
params=<|
ℜ
0
1.90,ββ,γ0.035,10334095,I01|>/.betaSoln
Out[]=

ℜ
0
1.9,βγ
ℜ
0
,γ0.035,10334095,I01
In[]:=
paramsN=Normal@(params//.params)
Out[]=
{
ℜ
0
1.9,β0.0665,γ0.035,10334095,I01}
The following rates are based on the paper [2]]
In[]:=
(*infectionRate*)​​β=0.0665;
In[]:=
(*recoveryrate*)​​γ=0.035;
In[]:=
(*deathrate*)​​μ=0.07;
In[]:=
n=10334095;
In[]:=
(*FoI*)​​λ[t_]=βi[t]/n;
In[]:=
tmax=1050;

Simple SIR model

In[]:=
​​sireqns1={s'[t]==-λ[t]*s[t],​​i'[t]==λ[t]*s[t]-γ*i[t],​​r'[t]==γ*i[t],​​s[0]==n-20,​​i[0]==20,​​r[0]==0};​​[t]+ℐ[t]+R[t]n;
In[]:=
(*Solvethesystem*)​​sol1=NDSolve[sireqns1,{s,i,r},{t,0,tmax}];​​(*Plotthesolutions*)​​fig1=Plot[Evaluate[{s[t],i[t],r[t]}/.sol1],{t,0,tmax},PlotLegends->{"Susceptible","Infected","Recovered"},AxesLabel->{"Time","Population"},AxesLabel->{"Time","Population"},PlotStyle->{Blue,Red,Green}]
Out[]=
Susceptible
Infected
Recovered
Susceptible : The susceptible refers to a group of people who are not yet infected but may be
infected with the SARS - CoV - 2 virus
Infected : The infected refers to a group of people who have been infected and have infectivity . Infected individuals can spread the disease to susceptible individuals .
Recovered : The removed refers to a group of people who have been removed from the COVID - 19
infected people, such as died, isolated or recovered and are immunized to the SARS - CoV - 2
virus .
β : infection rate
γ : recovery rate

SIR Model with Death and Births

In[]:=
Clear["Global`*"]
Let the birth rate be ,
b>0
, and death rate
μ>0
. consequently,
bμ
Let the new born babies are quite healthy but susceptible.
In[]:=
betaSoln=First@Solve
ℜ
0

β
γ+μ
,β
Out[]=
{β(γ+μ)
ℜ
0
}
In[]:=
params=<|
ℜ
0
1.90,ββ,γ0.035,μ->0.07,10334095,I01|>/.betaSoln
Out[]=

ℜ
0
1.9,β(γ+μ)
ℜ
0
,γ0.035,μ0.07,10334095,I01
In[]:=
paramsN=Normal@(params//.params)
Out[]=
{
ℜ
0
1.9,β0.1995,γ0.035,μ0.07,10334095,I01}
In[]:=
(*infectionRate*)​​β=0.1995;
In[]:=
(*recoveryrate*)​​γ=0.035;
In[]:=
(*deathrate*)​​μ=0.07;
In[]:=
n=10334095;
In[]:=
(*FoI*)​​λ[t_]=βi[t]/n;
b=μ
In[]:=
sireqns2={s'[t]==-λ[t]*s[t]-μ*s[t]+b*n,​​i'[t]==λ[t]*s[t]-γ*i[t]-μ*i[t],​​r'[t]==γ*i[t]-μ*r[t],​​s[0]==n-1,​​i[0]==1,​​r[0]==0};​​tmax1=400;
In[]:=
(*Solvethesystem*)​​sol2=NDSolve[sireqns2,{s,i,r},{t,0,tmax1},MaxStepSize->0.1];​​(*Plotthesolutions*)​​fig2=Plot[Evaluate[{s[t],i[t],r[t]}/.sol2],{t,0,tmax1},PlotLegends->{"Susceptible","Infected","Recovered"},AxesLabel->{"Time","Population"},AxesLabel->{"Time","Population"},PlotStyle->{Blue,Red,Green},PlotRange->All]
Out[]=
Susceptible
Infected
Recovered
In[]:=
p2=Plot[Evaluate[{i[t]}/.sol2],{t,0,tmax1},PlotLegends->{"Infected"},AxesLabel->{"Time","Population"},PlotStyle->{Red},PlotRange->All]
Out[]=
Infected

Vaccine Efficiency of COVID - 19

Individuals who have taken a full dose of vaccine and they acquire immunity to a particular
infectious disease . A population is said to have herd immunity for COVID - 19 if enough people
are immune so that the disease would not spread .
In our model, we consider that our vaccine is 100 % efficiency .

Leaky vaccine with coverage of 50 %

Immunity Loss of Vaccine

We have assumed that vaccine is 100 % efficacy . In real field, no vaccine gives full protection to COVID - 19 or other epidemic disease . Therefore, vaccinated individuals are not fully immunized . Overtime the immunity due to vaccination will decrease and after a fixed period the immunity of COVID-19 due to vaccination will be disappeared. At that situation, the vaccinated people will be susceptible to COVID-19.

Re - infected of COVID - 19

References

1
.
Manathunga, S.S., Abeyagunawardena, I.A. & Dharmaratne, S.D. A comparison of transmissibility of SARS-CoV-2 variants of concern. Virol J 20, 59 (2023). https://doi.org/10.1186/s12985-023-02018-x
2
.
Mohajan, Haradhan (2022): Mathematical Analysis of SIR Model for COVID-19 Transmission. Published in: Journal of Innovations in Medical Research , Vol. 1, No. 2 (31 August 2022): pp. 1-18. https://mpra.ub.uni-muenchen.de/114390/

CITE THIS NOTEBOOK

COVID-19 SIR models: transmission, vaccination, herd immunity dynamics revealed​
by Athanasios Paraskevopoulos​
Wolfram Community, STAFF PICKS, September 8, 2023
​https://community.wolfram.com/groups/-/m/t/3008488