Compare commits

..

1 Commits

Author SHA1 Message Date
coolneng 643960967a
Remove redundant sequencing runs argument 2021-03-29 20:31:40 +02:00
1 changed files with 2 additions and 2 deletions

View File

@ -16,7 +16,7 @@ save_data <- function(data) {
write.csv(vdj_sequences, "data/vdj_alignment.csv", row.names = FALSE)
}
process_data <- function(repertoire) {
process_data <- function(repertoire, sequencing_runs) {
columns <- c(
"sequence", "v_sequence_alignment",
"d_sequence_alignment", "j_sequence_alignment"
@ -36,4 +36,4 @@ parse_cli_arguments <- function() {
arguments <- parse_cli_arguments(commandArgs(trailing))
repertoire <- generate_repertoire(number_of_sequences = arguments[1])
process_data(repertoire)
process_data(repertoire, sequencing_runs)