diff sequence_overview.r @ 78:b523ce95d857 draft

Uploaded
author davidvanzessen
date Wed, 11 May 2016 10:29:33 -0400
parents c5c86d15cb94
children 0513b46178c4
line wrap: on
line diff
--- a/sequence_overview.r	Mon May 09 03:56:38 2016 -0400
+++ b/sequence_overview.r	Wed May 11 10:29:33 2016 -0400
@@ -16,7 +16,7 @@
 
 dat$seq_conc = paste(dat$CDR1.IMGT, dat$CDR2.IMGT, dat$CDR3.IMGT, dat$FR2.IMGT, dat$FR3.IMGT)
 
-IDs = dat[,c("Sequence.ID", "seq_conc", "best_match")]
+IDs = dat[,c("Sequence.ID", "seq_conc", "best_match", "Functionality")]
 IDs$best_match = as.character(IDs$best_match)
 
 #dat = data.frame(data.table(dat)[, list(freq=.N), by=c("best_match", "seq_conc")])