#' @title Run if Target Markdown interactive mode is not on.
#' @export
#' @family Target Markdown
#' @description In Target Markdown, run the enclosed code
#' only if interactive mode is not activated. Otherwise,
#' do not run the code.
#' @details Visit <books.ropensci.org/targets/literate-programming.html>
#' to learn about Target Markdown and interactive mode.
#' @return If Target Markdown interactive mode is not turned on,
#' the function returns the result of running the code.
#' Otherwise, the function invisibly returns `NULL`.
#' @param code R code to run if Target Markdown interactive mode
#' is not turned on.
#' @examples
#' tar_noninteractive(message("Not in interactive mode."))
tar_noninteractive <- function(code) {
if_any(
engine_knitr_is_interactive(),
invisible(),
force(code)
)
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.