Implement HVR sequence alignment

2021-03-27 09:39:18 +01:00
1 changed files with 1 additions and 0 deletions
--- a/src/alignment.r
+++ b/src/alignment.r
@ -29,6 +29,7 @@ align_sequence <- function(sequence, vdj_segment) {
  ))
 }
 perform_alignment <- function(sequences, vdj_segments) {
  sequence_alignment <- mcmapply(sequences,
    vdj_segments$hvr_region,