Skip to content

Commit

Permalink
Fix error in COLLAPSE_HV
Browse files Browse the repository at this point in the history
  • Loading branch information
willbradshaw committed Jun 12, 2024
1 parent a01ce93 commit 8cae2dc
Showing 1 changed file with 1 addition and 1 deletion.
2 changes: 1 addition & 1 deletion workflows/main.nf
Original file line number Diff line number Diff line change
Expand Up @@ -1171,7 +1171,7 @@ process COLLAPSE_HV {
return(max(x, na.rm = TRUE))
}
collapse <- function(x) ifelse(all(x == x[1]), x[1], paste(x, collapse="/"))
reads_filtered <- read_tsv("!{hv_reads_filtered}", col_names = TRUE, show_col_types = FALSE)
reads_filtered <- read_tsv("!{hv_hits_filtered}", col_names = TRUE, show_col_types = FALSE)
print(dim(reads_filtered))
reads_collapsed <- reads_filtered %>% group_by(seq_id) %>% summarize(
sample = collapse(sample), genome_id = collapse(genome_id),
Expand Down

0 comments on commit 8cae2dc

Please sign in to comment.