buf fix script 10

scripts/10_correction_batch_effects_unfiltered.Rmd

@@ -628,7 +628,7 @@ if (changing_status == "changed") {
   cat("PCA results and M-values in the different correction steps and final batch-corrected dataset were saved to the processed_data folder",
       sep = "<br<\n")
   
-  if (all.equal(colnames(Betas_clean_unfiltered_quantile_bmiq_filtered_combated),rownames(PhenoData_clean))){
+  if (all.equal(colnames(Betas_clean_unfiltered_quantile_bmiq_combated),rownames(PhenoData_clean))){
     cat("The sample names between the unfiltered-normalized-corrected Beta dataset and the phenotype data were identical", 
         "ExpressionSet for unfiltered data was created and saved to the processed data folder", sep = "<br>\n")
   } else {