diff waveica_wrapper.R @ 4:425c0494ec2d draft

planemo upload for repository https://github.com/RECETOX/galaxytools/tree/master/tools/waveica commit 84de3bc96ad2859d87c70ba94d8ceb0b2bc2a0da
author recetox
date Tue, 07 May 2024 12:49:20 +0000
parents dbbedb14b44c
children e424fa636281
line wrap: on
line diff
--- a/waveica_wrapper.R	Thu Oct 12 13:45:41 2023 +0000
+++ b/waveica_wrapper.R	Tue May 07 12:49:20 2024 +0000
@@ -231,15 +231,13 @@
 }
 
 store_data <- function(data, output, ext) {
-  if (ext == "csv") {
-    write.csv(data, file = output, row.names = FALSE, quote = FALSE)
-  } else if (ext == "tsv") {
+  if (ext == "parquet") {
+    arrow::write_parquet(data, output)
+  } else {
     write.table(data,
       file = output, sep = "\t",
       row.names = FALSE, quote = FALSE
     )
-  } else {
-    arrow::write_parquet(data, sink = output)
   }
   cat("Normalization has been completed.\n")
 }