From 675c81d45f1717c2d4ee89860c08245b8d2f400e Mon Sep 17 00:00:00 2001
From: Joe Zhu <sha.joe.zhu@gmail.com>
Date: Fri, 14 Nov 2025 15:18:05 +0800
Subject: [PATCH 1/2] update

---
 vignettes/guided_intermediate.Rmd             | 21 ++++++++++++++++++-
 vignettes/guided_intermediate_afun_reqs.Rmd   | 21 ++++++++++++++++++-
 vignettes/guided_intermediate_split_reqs.Rmd  | 16 +++++++++++++-
 ...guided_intermediate_translating_shells.Rmd | 21 ++++++++++++++++++-
 4 files changed, 75 insertions(+), 4 deletions(-)

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..292d1f12af 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

From 8c087d3ff1b44b5d9b346331721428f43f8c29f2 Mon Sep 17 00:00:00 2001
From: Joe Zhu <sha.joe.zhu@gmail.com>
Date: Fri, 14 Nov 2025 15:56:00 +0800
Subject: [PATCH 2/2] minor update

---
 vignettes/guided_intermediate_translating_shells.Rmd | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/vignettes/guided_intermediate_translating_shells.Rmd b/vignettes/guided_intermediate_translating_shells.Rmd
index 292d1f12af..b6869771b6 100644
--- a/vignettes/guided_intermediate_translating_shells.Rmd
+++ b/vignettes/guided_intermediate_translating_shells.Rmd
@@ -75,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(
@@ -161,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, ])
 ```