update

YuLab-SMU · Jun 15, 2024 · 3352352 · 3352352
1 parent 9cc2899
commit 3352352
Showing 1 changed file with 4 additions and 4 deletions.
diff --git a/R/dplyr-group_by.R b/R/dplyr-group_by.R
@@ -1,9 +1,9 @@
 
 ##' @method group_by enrichResult
 ##' @export
-group_by.enrichResult <- function(.data, ..., add = FALSE, .drop = FALSE) {
+group_by.enrichResult <- function(.data, ..., .add = FALSE, .drop = FALSE) {
     dots <- quos(...)
-    .data@result %<>% group_by(!!!dots, add = add, .drop = .drop)
+    .data@result %<>% group_by(!!!dots, .add = .add, .drop = .drop)
     return(.data)
 }
 
@@ -14,8 +14,8 @@ group_by.gseaResult <- group_by.enrichResult
 
 ##' @method group_by compareClusterResult
 ##' @export
-group_by.compareClusterResult <- function(.data, ..., add = FALSE, .drop = FALSE) {
+group_by.compareClusterResult <- function(.data, ..., .add = FALSE, .drop = FALSE) {
     dots <- quos(...)
-    .data@compareClusterResult %<>% group_by(!!!dots, add = add, .drop = .drop)
+    .data@compareClusterResult %<>% group_by(!!!dots, .add = .add, .drop = .drop)
     return(.data)
 }