In carpentries/dovetail: Document Engine to Insert Nested Block Quotes

library(dovetail)
library(knitr)
opts_chunk$set(error = TRUE)

x  <- "The cat purrrs on my lap."

#' ## Count words
#' 
#' 1. How many words are in the sentence `x`?
#'
#' @solution
#'
#' There is more than one way of doing this but here is a solution.
#' 
#' ```r
n_words <- length(strsplit(x, " ")[[1]])
n_words
#' ```
#'
#' 1. How many letters are in the sentence `x`?
#' 
#'
#' ```r
n_chars <- nchar(gsub("[^a-zA-Z]", "", x))
n_chars
#' ```

Now that we know that there are r n_words words and r n_chars characters in the sentence. Let's add these 2 numbers

#' ## add these 2 numbers
#' 
#' @solution
#' Are these variables available?
#' 
#' ```r
#' n_words + n_chars
#' ```

carpentries/dovetail documentation built on Sept. 23, 2021, 9:35 p.m.