aboutsummaryrefslogtreecommitdiff
path: root/R
diff options
context:
space:
mode:
Diffstat (limited to 'R')
-rw-r--r--R/pkg/R/group.R4
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")
}