updated immunity.R

HeLab · Feb 27, 2022 · 0d7d35c · 0d7d35c
1 parent ba61e48
commit 0d7d35c
Showing 1 changed file with 1 addition and 1 deletion.
diff --git 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,