Exchange pattern and subject in the alignment

This commit is contained in:
coolneng 2021-04-08 18:31:50 +02:00
parent dd9f7ffde4
commit 82fdfdc6b9
Signed by: coolneng
GPG Key ID: 9893DA236405AF57
1 changed files with 2 additions and 2 deletions

View File

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