From 0d7d35cc8983944901351a86964d7e1161dd6fd3 Mon Sep 17 00:00:00 2001 From: Qixin He Date: Sun, 27 Feb 2022 13:54:58 -0500 Subject: [PATCH] updated immunity.R --- batchRuns/ODESImmunity_hqx.R | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/batchRuns/ODESImmunity_hqx.R b/batchRuns/ODESImmunity_hqx.R index 3473a82..f80c6bb 100644 --- a/batchRuns/ODESImmunity_hqx.R +++ b/batchRuns/ODESImmunity_hqx.R @@ -131,7 +131,7 @@ SEAI<-function(t,y,p){ allPara<-read.csv(paramFile,sep=",",header=T) -currentPara<-allPara[No,] +currentPara<-allPara[allPara$No==No,] t2 = seq(from=0,to=30*365,by=1) N0 = c(PWU=100,PWD=0,PRU=2,PRD=0,