#' Install (all) Shinto Labs R packages
#' @param what Which packages to install. Defaults to most common ones.
#' @param \dots Further arguments passed to [remotes::install_github()]
#' @export
install_shinto_rpackages <- function(what = c("shintobag","shintoshiny",
"shintoui","shinyfilterset","shintodashboard",
"shintousers","shinysavedom","shintopostcode"), ...){
for(p in what){
remotes::install_github(paste0("moturoa/",p), upgrade = "never", quiet = TRUE, ...)
print(paste(p, ": done installing / no updates found."))
}
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.