diff --git a/vignettes/custom-basic-table-arguments.Rmd b/vignettes/custom-basic-table-arguments.Rmd index 29f6d344..ad589c5d 100644 --- a/vignettes/custom-basic-table-arguments.Rmd +++ b/vignettes/custom-basic-table-arguments.Rmd @@ -40,7 +40,7 @@ For multi-table case, per table (`basic_table_args_table`) and then default (`ba ## Example - Single-Table Module -```{r echo=TRUE} +```{r warning=FALSE} library(shiny) library(teal.widgets) library(magrittr) @@ -85,8 +85,8 @@ server <- function(input, output, session) { ) output$table1 <- renderPrint(eval(table_expr)) } -``` -```{r echo=TRUE, eval = FALSE} -shinyApp(ui, server) +if (interactive()) { + shinyApp(ui, server) +} ``` diff --git a/vignettes/custom-ggplot2-arguments.Rmd b/vignettes/custom-ggplot2-arguments.Rmd index afc55552..499dd0ed 100644 --- a/vignettes/custom-ggplot2-arguments.Rmd +++ b/vignettes/custom-ggplot2-arguments.Rmd @@ -54,7 +54,7 @@ To solve the problem please use `::` to prefix it directly to a specific package ## Loading libraries and data -```{r echo=TRUE, warning=FALSE, message=FALSE} +```{r warning=FALSE} library(shiny) library(ggplot2) library(teal.widgets) @@ -104,8 +104,8 @@ server <- function(input, output, session) { print(plot_expr) output$plot1 <- renderPlot(eval(plot_expr)) } -``` -```{r echo=TRUE, eval = FALSE} -shinyApp(ui, server) +if (interactive()) { + shinyApp(ui, server) +} ```