WT: Minor fix

williamthistle · williamthistle · commit 45ebe7f45be6 · 2023-11-06T11:09:21.000-05:00
diff --git a/R/wrapper.R b/R/wrapper.R
@@ -144,7 +144,7 @@ run_SPEEDI <- function(reference_tissue, data_type = "RNA", species = "human", d
                                      log_flag = SPEEDI_variables$log_flag)
     }
   }
-  # Delete Rplots.pdf file if it exists (junk file created by R batch mode) 
+  # Delete Rplots.pdf file if it exists (junk file created by R batch mode)
   if(file.exists(paste0(SPEEDI_variables$output_dir, "Rplots.pdf"))) {
     file.remove(paste0(SPEEDI_variables$output_dir, "Rplots.pdf"))
   }

Original file line number	Diff line number	Diff line change
`@@ -144,7 +144,7 @@ run_SPEEDI <- function(reference_tissue, data_type = "RNA", species = "human", d`
`144`	`144`	`log_flag = SPEEDI_variables$log_flag)`
`145`	`145`	`}`
`146`	`146`	`}`
`147`		`- # Delete Rplots.pdf file if it exists (junk file created by R batch mode)`
	`147`	`+ # Delete Rplots.pdf file if it exists (junk file created by R batch mode)`
`148`	`148`	`if(file.exists(paste0(SPEEDI_variables$output_dir, "Rplots.pdf"))) {`
`149`	`149`	`file.remove(paste0(SPEEDI_variables$output_dir, "Rplots.pdf"))`
`150`	`150`	`}`