... | ... |
@@ -33,7 +33,6 @@ export(topSeqsPlot) |
33 | 33 |
export(uniqueSeqs) |
34 | 34 |
import(LymphoSeqDB) |
35 | 35 |
import(UpSetR) |
36 |
-import(dplyr) |
|
37 | 36 |
import(ggplot2) |
38 | 37 |
import(ggtree) |
39 | 38 |
import(msa) |
... | ... |
@@ -46,6 +45,8 @@ importFrom(VennDiagram,draw.triple.venn) |
46 | 45 |
importFrom(circlize,chordDiagram) |
47 | 46 |
importFrom(circlize,colorRamp2) |
48 | 47 |
importFrom(data.table,fread) |
48 |
+importFrom(dplyr,group_by) |
|
49 |
+importFrom(dplyr,summarise) |
|
49 | 50 |
importFrom(grid,grid.draw) |
50 | 51 |
importFrom(grid,grid.newpage) |
51 | 52 |
importFrom(ineq,Gini) |
... | ... |
@@ -31,9 +31,8 @@ |
31 | 31 |
#' @seealso Refer to the LymphoSeqDB package for details regarding the |
32 | 32 |
#' prevalenceTRB and publishedTRB database. |
33 | 33 |
#' @export |
34 |
-#' @import dplyr |
|
35 |
-#' @import LymphoSeqDB |
|
36 | 34 |
#' @import LymphoSeqDB |
35 |
+#' @importFrom dplyr group_by summarise |
|
37 | 36 |
topFreq <- function(productive.aa, percent = 0.1) { |
38 | 37 |
if(any(unlist(lapply(productive.aa, function(x) |
39 | 38 |
x[, "aminoAcid"] == "" | grepl("\\*", x[, "aminoAcid"]) | |