# Subset example data
db <- subset(InfluenzaDb, CPRIMER %in% c("IGHA","IGHM") &
BARCODE %in% c("RL016","RL018","RL019","RL021"))
# Run calcDBObservedMutations()
db_new <- calcDBObservedMutations(db, sequenceColumn="SEQUENCE_IMGT",
germlineColumn="GERMLINE_IMGT_D_MASK",
frequency=TRUE,
regionDefinition=IMGT_V_NO_CDR3,
nproc=1)
Run the code above in your browser using DataLab