/usr/share/doc/r-cran-dplyr/tests/testthat/test-utils.R is in r-cran-dplyr 0.7.4-3.
This file is owned by root:root, with mode 0o644.
The actual contents of the file can be viewed below.
1 2 3 4 5 6 7 8 9 10 11 12 13 | context("utils")
test_that("check_pkg() gives correct error message", {
expect_error(
dplyr:::check_pkg("`__foobarbaz__`", "foobar a baz"),
"The `__foobarbaz__` package is required to foobar a baz")
})
test_that("get_vars() handles list of symbols as vars attribute", {
gdf <- group_by(tibble(g = 1:2), g)
gdf <- set_attrs(gdf, vars = list(sym("g")))
expect_identical(test_grouped_df(gdf), gdf)
})
|