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,