Mercurial > repos > recetox > recetox_aplcms_compute_clusters
diff utils.R @ 3:a054eae3123c draft
planemo upload for repository https://github.com/RECETOX/galaxytools/tree/master/tools/recetox_aplcms commit 505c3374a3e1e9aa450fcb752f2b8f87558fedbb
author | recetox |
---|---|
date | Thu, 25 May 2023 09:14:38 +0000 |
parents | ce00e1d03c31 |
children | 15aae2bfa67d |
line wrap: on
line diff
--- a/utils.R Wed May 24 14:48:47 2023 +0000 +++ b/utils.R Thu May 25 09:14:38 2023 +0000 @@ -41,9 +41,9 @@ save_parquet_collection <- function(feature_tables, sample_names, subdir) { dir.create(subdir) - for (i in seq_len(length(feature_tables))) { - filename <- file.path(subdir, paste0(subdir, "_", sample_names[i], ".parquet")) - feature_table <- as.data.frame(feature_tables[[i]]) + for (i in seq_len(length(table$feature_tables))) { + filename <- file.path(subdir, paste0(sample_names[i], ".parquet")) + feature_table <- as.data.frame(table$feature_tables[[i]]) feature_table <- save_sample_name(feature_table, sample_names[i]) arrow::write_parquet(feature_table, filename) }