coolneng
/
locigenesis
1
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

Compare commits

base: coolneng:3209641768fec86b3a0e338880cfdc4b7adfece5
Branches Tags
coolneng:master
coolneng:0.2.2
coolneng:0.2.1
coolneng:0.2.0
coolneng:0.1.1
coolneng:0.1.0
..
compare: coolneng:c5f28ea3bf7bd500649dcac971ead3237906fc69
Branches Tags
coolneng:master
coolneng:0.2.2
coolneng:0.2.1
coolneng:0.2.0
coolneng:0.1.1
coolneng:0.1.0

1 Commits
3209641768 ... c5f28ea3bf

Author SHA1 Message Date
coolneng c5f28ea3bf
Implement HVR sequence alignment 2021-03-27 09:39:18 +01:00
1 changed files with 2 additions and 1 deletions
Show Stats Expand all files Collapse all files

3
src/alignment.r
View File

@ -5,7 +5,8 @@ construct_dataframe <- function(data) {
vdj_string_set <- lapply(data, FUN = Biostrings::DNAStringSet) vdj_string_set <- lapply(data, FUN = Biostrings::DNAStringSet)
vdj_dataframe <- as.data.frame(vdj_string_set) vdj_dataframe <- as.data.frame(vdj_string_set)
vdj_dataframe$hvr_region <- paste(vdj_dataframe$v_sequence, vdj_dataframe$hvr_region <- paste(vdj_dataframe$v_sequence,
vdj_dataframe$d_sequence, vdj_dataframe$j_sequence, vdj_dataframe$d_sequence,
vdj_dataframe$j_sequence,
sep = "" sep = ""
) )
return(vdj_dataframe) return(vdj_dataframe)