Update find_balance_accuracy_v4.R

Stuartlab-UCSC · Jul 9, 2019 · 2130747 · 2130747
1 parent c3fec17
commit 2130747
Showing 1 changed file with 2 additions and 1 deletion.
diff --git a/find_balance_accuracy_v4.R b/find_balance_accuracy_v4.R
@@ -10,7 +10,8 @@ file_name_list = list.files(path = "/Users/user/Desktop/BD2K_project/data/")
 #files_name_list 
 num_files = length(file_name_list)
 for (i in 1:num_files) {
-  if(file_name <- gsub('_stats_preds.RData', '', file_name_list)){
+  #file_name <- file_name_list[i]
+  if(length(grep("_file.R","my_file.R",fixed=TRUE)) == 1){
     file_name = file_name_list[(i)]
     load(paste0("/Users/user/Desktop/BD2K_project/data/", file_name))
     stats = confM[(4)]