Exchange pattern and subject in the alignment

2021-04-08 18:31:50 +02:00
parent dd9f7ffde4
commit 82fdfdc6b9
1 changed files with 2 additions and 2 deletions
--- a/src/alignment.r
+++ b/src/alignment.r
@@ -35,8 +35,8 @@ construct_full_sequences <- function(vdj_segments, metadata) {

 align_sequence <- function(sequence, vdj_segment) {
  return(Biostrings::pairwiseAlignment(
-    pattern = sequence,
-    subject = vdj_segment,
+    subject = sequence,
+    pattern = vdj_segment,
    type = "global-local",
    gapOpening = 1,
  ))