context("dplyr")
with_compat <- function(compat, ...) {
with_mock(
`dplyr::mutate` = compat$mutate,
`dplyr::count` = compat$count,
`dplyr::rename` = compat$rename,
force(...)
)
}
with_compat(dplyr_compat, {
testthat::test_package("dplyr")
})
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.