Mercurial > repos > recetox > recetox_aplcms_recover_weaker_signals

comparison utils.R @ 5:e32b37017e68 draft

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
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:02 +0000
parents 1d643a079220
children 80930df7b6cb
comparison
equal deleted inserted replaced
4:1d643a079220 5:e32b37017e68
39 return(features) 39 return(features)
40 } 40 }
41 41
42 save_parquet_collection <- function(feature_tables, sample_names, subdir) { 42 save_parquet_collection <- function(feature_tables, sample_names, subdir) {
43 dir.create(subdir) 43 dir.create(subdir)
44 for (i in seq_len(length(feature_tables))) { 44 for (i in seq_len(length(table$feature_tables))) {
45 filename <- file.path(subdir, paste0(subdir, "_", sample_names[i], ".parquet")) 45 filename <- file.path(subdir, paste0(sample_names[i], ".parquet"))
46 feature_table <- as.data.frame(feature_tables[[i]]) 46 feature_table <- as.data.frame(table$feature_tables[[i]])
47 feature_table <- save_sample_name(feature_table, sample_names[i]) 47 feature_table <- save_sample_name(feature_table, sample_names[i])
48 arrow::write_parquet(feature_table, filename) 48 arrow::write_parquet(feature_table, filename)
49 } 49 }
50 } 50 }
51 51