R/miniki.R

In ellessenne/uolvid: Templates for Talks and Presentations

#' Minimal-looking light template for a beamer presentation following Karolinska Institutet's visual identity guidelines, with an emphasis on typography
#'
#' @description A beamer template following Karolinska Institutet's visual identity guidelines
#' @inheritParams rmarkdown::beamer_presentation
#' @param ... Additional arguments to [rmarkdown::beamer_presentation()]
#'
#' @return R Markdown output format to pass to [rmarkdown::render()]
#'
#' @examples
#'
#' \dontrun{
#' library(rmarkdown)
#' draft("my_presentation.Rmd", template = "miniki", package = "plates")
#' }
#'
#' @export
miniki <- function(...) {
  rmarkdown::beamer_presentation(
    ...,
    template = find_resource("miniki", "template.tex"),
    keep_tex = TRUE,
    highlight = NULL,
    latex_engine = "xelatex"
  )
}