R/check_captions.R

Defines functions check_captions

check_captions = function() {
  tokens = read_tokens()
  tokens %>%
    dplyr::filter(X1 == "caption") %>%
    dplyr::distinct() %>%
    dplyr::filter(str_detect(X2, "@tufte@", negate = TRUE))
}
jr-packages/jrNotes documentation built on Dec. 18, 2020, 11:07 p.m.