tests/test-cran/test-utils.R
In yihui/xfun: Supporting Functions for Packages Maintained by 'Yihui Xie'
library(testit)
assert('attr() is strict', {
z = structure(list(a = 1), foo = 2)
(attr(z, 'foo') %==% 2)
(attr(z, 'f') %==% NULL)
})
assert('in_dir() preserves the working directory', {
owd = getwd()
in_dir('.', setwd(tempdir()))
(same_path(owd, getwd()))
})
yihui/xfun documentation built on May 4, 2024, 5:52 p.m.
R Package Documentation
Browse R Packages
We want your feedback!
Note that we can't provide technical support on individual packages. You should contact the package authors for that.
library(testit)
assert('attr() is strict', {
z = structure(list(a = 1), foo = 2)
(attr(z, 'foo') %==% 2)
(attr(z, 'f') %==% NULL)
})
assert('in_dir() preserves the working directory', {
owd = getwd()
in_dir('.', setwd(tempdir()))
(same_path(owd, getwd()))
})
R Package Documentation
Browse R Packages
We want your feedback!
Note that we can't provide technical support on individual packages. You should contact the package authors for that.
Embedding an R snippet on your website
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.