From 66277525b609e88b2ae211a498b575978d83950f Mon Sep 17 00:00:00 2001
From: "Zhang, Dabao" <zhangdb@purdue.edu>
Date: Fri, 20 May 2022 14:18:35 -0400
Subject: [PATCH] Update adj_adjust.R

---
 script/adj/adj_adjust.R | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/script/adj/adj_adjust.R b/script/adj/adj_adjust.R
index 9bdb54a..dd0f95b 100644
--- a/script/adj/adj_adjust.R
+++ b/script/adj/adj_adjust.R
@@ -78,7 +78,7 @@ gexp_int <- gexp_int_pca
 coeff_mat=matrix(0,p,5)
 
 
-print("Begin to adjust for covariates effect for race and gender")
+print("Adjusting for effects of covariates such as race and gender...")
 #merged$race[merged$race=="not reported"]="white"
 cat("\n")
 for( i in 1:p)
@@ -97,7 +97,7 @@ for( i in 1:p)
   gexp_int[i, ] <- resid(tmpfit)
   gexp_int_pca[i, ] <- resid(tmpfit_pca)
 
-  if(i%%1000==0) print(paste0(i, " genes finished"))
+  if(i%%1000==0) print(paste0(i, " genes completed!"))
 }
 
 cat("\n")