R/get_path.R
In cmcouto-silva/gt: Facilities for essential tasks in R
Defines functions
get_path
#' @export
get_path <- function(file) {
sapply(file, function(vec) {
if(grepl("/", vec)) {
gsub("(^.*/).*$", "\\1", vec)
} else {
path <- "./"
}
})
}
cmcouto-silva/gt documentation built on June 6, 2021, 7:14 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.
Defines functions get_path
#' @export
get_path <- function(file) {
sapply(file, function(vec) {
if(grepl("/", vec)) {
gsub("(^.*/).*$", "\\1", vec)
} else {
path <- "./"
}
})
}
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.