Clone the content of an R package

clonePackageSource.R

clonePackageSource <- function(from, to, ignore=c(".git")) {
    unisetRootFiles <- list.files(cloneSourceFolder, all.files = TRUE, include.dirs = TRUE)
    unisetRootFiles <- setdiff(unisetRootFiles, c(".", "..", ".git"))
    dir.create(cloneDestinationFolder, recursive = TRUE)
    for (rootFile in unisetRootFiles) {
        message(rootFile)
        file.copy(
            from = file.path(cloneSourceFolder, rootFile),
            to = file.path(cloneDestinationFolder),
            recursive = TRUE, overwrite = TRUE)
    }
}