R/make_website.R

In choisy/marc: Miscellaneous Accessory R Codes

#' @export
make_website <- function(websitename = paste(basename(getwd()), "package")) {
  dir.create("website")
  cat(paste0("name: \"", websitename,
             "\"\nhref: index.html\noutput_dir: \"../docs\""),
      file = "website/_site.yml")
}