### Modified from Rserve/src/install.libs.R
### For libs
files <- c("pbdBASE.so", "pbdBASE.so.dSYM", "pbdBASE.dylib", "pbdBASE.dll", "symbols.rds")
files <- files[file.exists(files)]
if(length(files) > 0){
libsarch <- if (nzchar(R_ARCH)) paste("libs", R_ARCH, sep='') else "libs"
dest <- file.path(R_PACKAGE_DIR, libsarch)
dir.create(dest, recursive = TRUE, showWarnings = FALSE)
file.copy(files, dest, overwrite = TRUE, recursive = TRUE)
}
### For etc
file <- "Makeconf"
if(file.exists(file)){
etcarch <- if (nzchar(R_ARCH)) paste("etc", R_ARCH, sep='') else "etc"
dest <- file.path(R_PACKAGE_DIR, etcarch)
dir.create(dest, recursive = TRUE, showWarnings = FALSE)
file.copy(file, dest, overwrite = TRUE)
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.