aindreas/uni
1
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Add second year

Browse Source
This commit is contained in:
Aindréas Ó hAodha
2023-12-07 01:19:12 +00:00
parent 3291e5c79e
commit 3d12031ab8
1168 changed files with 431409 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files

15
second/semester2/CT248/Assignments/Assignment-07/SIR.m Normal file
View File

@ -0,0 +1,15 @@
function dydt = SIR(t, x, c, i, alpha, beta, gamma)
dydt = [0; 0; 0; 0; 0];
S = x(1);
I = x(2);
R = x(3);
H = x(4);
RH = x(5);
N = S + I + R + H + RH;
dydt(1) = (-c*S) * (I/N) * i;
dydt(2) = (c*S) * (I/N) * i - (alpha*I);
dydt(3) = (alpha*I) - (beta*R);
dydt(4) = (beta*R) - (gamma*H);
dydt(5) = gamma*H;
end