diff --git a/vignettes/custom-basic-table-arguments.Rmd b/vignettes/custom-basic-table-arguments.Rmd index d7deb932..8dac63b1 100644 --- a/vignettes/custom-basic-table-arguments.Rmd +++ b/vignettes/custom-basic-table-arguments.Rmd @@ -61,7 +61,7 @@ ui <- fluidPage( server <- function(input, output, session) { dev_table_args <- basic_table_args(show_colcounts = TRUE) - + table_expr <- substitute( expr = { tt <- f_table_expr %>% diff --git a/vignettes/custom-ggplot2-arguments.Rmd b/vignettes/custom-ggplot2-arguments.Rmd index 32b9cfbc..5c9dd6f6 100644 --- a/vignettes/custom-ggplot2-arguments.Rmd +++ b/vignettes/custom-ggplot2-arguments.Rmd @@ -82,7 +82,7 @@ server <- function(input, output, session) { labs = list(subtitle = "Dev substitle"), theme = list(legend.position = "none") ) - + f_ggplot2_expr <- parse_ggplot2_args( resolve_ggplot2_args( user_plot = user_ggplot2_args$plot1, @@ -90,7 +90,7 @@ server <- function(input, output, session) { module_plot = dev_ggplot2_args ) ) - + plot_expr <- substitute( expr = { gg <- ggplot(iris, aes(x = Sepal.Length, y = Petal.Length, color = Species)) +