diff options
Diffstat (limited to 'R')
-rw-r--r-- | R/pkg/R/group.R | 4 |
1 files changed, 1 insertions, 3 deletions
diff --git a/R/pkg/R/group.R b/R/pkg/R/group.R index 5a7a8a2cab..b758481997 100644 --- a/R/pkg/R/group.R +++ b/R/pkg/R/group.R @@ -102,9 +102,7 @@ setMethod("agg", } } jcols <- lapply(cols, function(c) { c@jc }) - # the GroupedData.agg(col, cols*) API does not contain grouping Column - sdf <- callJStatic("org.apache.spark.sql.api.r.SQLUtils", "aggWithGrouping", - x@sgd, listToSeq(jcols)) + sdf <- callJMethod(x@sgd, "agg", jcols[[1]], listToSeq(jcols[-1])) } else { stop("agg can only support Column or character") } |