`[.grouped_df` <- function(x, i, j, drop = FALSE) {
out <- NextMethod()
groups <- intersect(names(out), dplyr::group_vars(x))
if (length(groups)) {
dplyr::grouped_df(out, groups)
} else {
dplyr::tbl_df(out)
}
}
RetroSearch is an open source project built by @garambo | Open a GitHub Issue
Search and Browse the WWW like it's 1997 | Search results from DuckDuckGo
HTML:
3.2
| Encoding:
UTF-8
| Version:
0.7.4