code/chunk-options.R

In nateaff/legolda: Color Topic Models of the Lego Dat Set

# ---- knitr-opts-chunk ----
# Update knitr chunk options
# https://yihui.name/knitr/options/#chunk-options
knitr::opts_chunk$set(
  cache = FALSE,
  # dependencies 
  autodep = TRUE, 
  # Don't rerun if only comments changed
  cache.comments = FALSE,
  cache.lazy = TRUE, 
  echo = FALSE, 
  eval = TRUE,
  comment = NA,
  fig.align = "center",
  tidy = TRUE,
  fig.width = 8,
  fig.height = 6,
  out.width = "100%",
  echo = TRUE,
  warning = FALSE,
  message = FALSE,
  fig.align = "center",
  fig.path = paste0("figure/", knitr::current_input(), "/")
)

# ---- last-updated ----
# Insert the date the file was last updated
cat(sprintf("**Last updated:** %s", Sys.Date()))

# ---- code-version ----
# Insert the code version (Git commit SHA1) if Git repository exists and R
# package git2r is installed
if (requireNamespace("git2r", quietly = TRUE)) {
  if (git2r::in_repository()) {
    code_version <- substr(git2r::commits()[[1]]@sha, 1, 7)
  } else {
    code_version <- "Unavailable. Initialize Git repository to enable."
  }
} else {
  code_version <- "Unavailable. Install git2r package to enable."
}
cat(sprintf("**Code version:** %s", code_version))
rm(code_version)

# ---- session-info ----
sessionInfo()