diff --git a/flu_stats_contingency.R b/flu_stats_contingency.R
index a64ad95..8f43b88 100755
--- a/flu_stats_contingency.R
+++ b/flu_stats_contingency.R
@@ -69,7 +69,7 @@ stats_df = subset(categ_df, select = -c(mosaic))
 
 my_categ_cols = colnames(categ_df)[!colnames(categ_df)%in%metadata_cols]
 
-if ( length(my_categ_cols) == ncol(categ_df) - length(drop_cols) ){
+if ( length(my_categ_cols) == ncol(categ_df) - length(metadata_cols) ){
   cat("PASS: variables for chisq test successfully extracted")
 }else{
   cat("FAIL: length mismatch when extracting variables for chisq")
@@ -133,7 +133,7 @@ sum(tab)
 #================================================================================
 #--------------------
 # Fishers test: without any OR
-# see standalone script for this!
+# see standalone script for ORs
 #--------------------
 
 fisher_df = data.frame()