diff --git a/vignettes/guided_intermediate.Rmd b/vignettes/guided_intermediate.Rmd index c0412e228f..e8e65376a1 100644 --- a/vignettes/guided_intermediate.Rmd +++ b/vignettes/guided_intermediate.Rmd @@ -13,14 +13,33 @@ output: toc_float: true vignette: > %\VignetteIndexEntry{A Guided Tour of rtables - Intermediate} - %\VignetteEngine{knitr::rmarkdown} %\VignetteEncoding{UTF-8} + %\VignetteEngine{knitr::rmarkdown} editor_options: markdown: wrap: 72 chunk_output_type: console --- +```{r, include = FALSE} +suggested_dependent_pkgs <- c("dplyr") +knitr::opts_chunk$set( + collapse = TRUE, + comment = "#>", + eval = all(vapply( + suggested_dependent_pkgs, + requireNamespace, + logical(1), + quietly = TRUE + )) +) +``` + +```{r, echo=FALSE} +knitr::opts_chunk$set(comment = "#") +``` + + # Scope and Audience Now that we have an understanding of how the `rtables` framework diff --git a/vignettes/guided_intermediate_afun_reqs.Rmd b/vignettes/guided_intermediate_afun_reqs.Rmd index bf9850161e..a903365b66 100644 --- a/vignettes/guided_intermediate_afun_reqs.Rmd +++ b/vignettes/guided_intermediate_afun_reqs.Rmd @@ -14,14 +14,33 @@ output: code_folding: show vignette: > %\VignetteIndexEntry{Intermediate rtables - Identifying Required Analysis Behavior} - %\VignetteEngine{knitr::rmarkdown} %\VignetteEncoding{UTF-8} + %\VignetteEngine{knitr::rmarkdown} editor_options: markdown: wrap: 72 chunk_output_type: console --- +```{r, include = FALSE} +suggested_dependent_pkgs <- c("dplyr") +knitr::opts_chunk$set( + collapse = TRUE, + comment = "#>", + eval = all(vapply( + suggested_dependent_pkgs, + requireNamespace, + logical(1), + quietly = TRUE + )) +) +``` + +```{r, echo=FALSE} +knitr::opts_chunk$set(comment = "#") +``` + + # Introduction ```{r init, echo = FALSE, results = "hidden"} diff --git a/vignettes/guided_intermediate_split_reqs.Rmd b/vignettes/guided_intermediate_split_reqs.Rmd index 96468723d3..26ea7cbf21 100644 --- a/vignettes/guided_intermediate_split_reqs.Rmd +++ b/vignettes/guided_intermediate_split_reqs.Rmd @@ -14,14 +14,28 @@ output: code_folding: show vignette: > %\VignetteIndexEntry{Intermediate rtables - Identifying Required Faceting Behavior} - %\VignetteEngine{knitr::rmarkdown} %\VignetteEncoding{UTF-8} + %\VignetteEngine{knitr::rmarkdown} editor_options: markdown: wrap: 72 chunk_output_type: console --- +```{r, include = FALSE} +suggested_dependent_pkgs <- c("dplyr") +knitr::opts_chunk$set( + collapse = TRUE, + comment = "#>", + eval = all(vapply( + suggested_dependent_pkgs, + requireNamespace, + logical(1), + quietly = TRUE + )) +) +``` + # Introduction ```{r init, echo = FALSE, results = "hidden"} diff --git a/vignettes/guided_intermediate_translating_shells.Rmd b/vignettes/guided_intermediate_translating_shells.Rmd index 5ec8d195d5..b6869771b6 100644 --- a/vignettes/guided_intermediate_translating_shells.Rmd +++ b/vignettes/guided_intermediate_translating_shells.Rmd @@ -13,14 +13,33 @@ output: toc_float: true vignette: > %\VignetteIndexEntry{Intermediate rtables - Translating Shells To Layouts} - %\VignetteEngine{knitr::rmarkdown} %\VignetteEncoding{UTF-8} + %\VignetteEngine{knitr::rmarkdown} editor_options: markdown: wrap: 72 chunk_output_type: console --- +```{r, include = FALSE} +suggested_dependent_pkgs <- c("dplyr") +knitr::opts_chunk$set( + collapse = TRUE, + comment = "#>", + eval = all(vapply( + suggested_dependent_pkgs, + requireNamespace, + logical(1), + quietly = TRUE + )) +) +``` + +```{r, echo=FALSE} +knitr::opts_chunk$set(comment = "#") +``` + + # Introduction The first - and often largest - hurdle to creating a table via @@ -56,7 +75,7 @@ knitr::opts_chunk$set(comment = "") ``` -```{r, eval = TRUE, echo = FALSE, result = "asis"} +```{r, echo = FALSE, result = "asis"} adsl <- ex_adsl %>% filter(SEX %in% c("M", "F") & RACE %in% c("ASIAN", "BLACK OR AFRICAN AMERICAN", "WHITE")) %>% mutate( @@ -142,7 +161,7 @@ table. Our shell gives us the following to indicate column structure: -```{r, eval = TRUE, echo = FALSE, result="asis"} +```{r, echo = FALSE, result="asis"} fixed_shell(result[0, ]) ```