Skip to content

use roxy.shinylive #775

New issue

Have a question about this project? Sign up for a free GitHub account to open an issue and contact its maintainers and the community.

Sign up for GitHub

By clicking “Sign up for GitHub”, you agree to our terms of service and privacy statement. We’ll occasionally send you account related emails.

Already on GitHub? Sign in to your account

Merged
merged 30 commits into from
Oct 1, 2024
Merged

use roxy.shinylive #775

Show file tree
Hide file tree
Changes from 21 commits
Commits
Show all changes
30 commits
Select commit Hold shift + click to select a range
d559939
use roxy.shinylive
pawelru Aug 20, 2024
b57e7e0
Merge branch 'main' into init
pawelru Aug 20, 2024
609e88d
spelling; lint
pawelru Aug 20, 2024
33f7d9d
add roxy.shinylive to staged deps
pawelru Aug 20, 2024
095b6cb
proper examples -> examplesIf
pawelru Aug 20, 2024
834e6ec
nolint
pawelru Aug 21, 2024
26cb31d
enhance readme; add shinylive to vignettes
pawelru Aug 21, 2024
fcb3d5b
update
pawelru Aug 27, 2024
fe12fe9
Merge branch 'main' into init
pawelru Aug 30, 2024
61dee6f
update
pawelru Sep 4, 2024
54a45c5
update
pawelru Sep 4, 2024
a39f72d
[skip roxygen] [skip vbump] Roxygen Man Pages Auto Update
dependabot-preview[bot] Sep 4, 2024
41b1185
update
pawelru Sep 5, 2024
ab744c3
[skip roxygen] [skip vbump] Roxygen Man Pages Auto Update
dependabot-preview[bot] Sep 5, 2024
4cc83bc
empty
pawelru Sep 5, 2024
cb6b38a
empty
pawelru Sep 5, 2024
5f87bea
update
pawelru Sep 5, 2024
5852bff
[skip roxygen] [skip vbump] Roxygen Man Pages Auto Update
dependabot-preview[bot] Sep 5, 2024
607a93d
empty
pawelru Sep 5, 2024
ee0a0f8
update
pawelru Sep 5, 2024
2cf10a8
fix notes
pawelru Sep 5, 2024
c5cc45f
z-index
pawelru Sep 17, 2024
35a7418
Merge branch 'main' into init
pawelru Sep 17, 2024
50a5d16
z-index in vignettes
pawelru Sep 17, 2024
fc22ffc
update
pawelru Sep 18, 2024
670c341
Merge branch 'main' into init
pawelru Sep 18, 2024
d1fccfc
simpler check if in pkgdown
pawelru Sep 18, 2024
7d5cecd
update
pawelru Sep 19, 2024
006c1f2
[skip roxygen] [skip vbump] Roxygen Man Pages Auto Update
dependabot-preview[bot] Sep 20, 2024
ed824b0
update
pawelru Oct 1, 2024
File filter

Filter by extension

Filter by extension
Conversations
Failed to load comments.
Loading
Jump to
Jump to file
Failed to load files.
Loading
Diff view
Diff view
2 changes: 2 additions & 0 deletions .gitignore
View file
Open in desktop
Original file line number Diff line number Diff line change
Expand Up @@ -29,3 +29,5 @@ vignettes/*.R
coverage.*
tests/testthat/_snaps/**/*.new.md
tests/testthat/_snaps/**/*.new.svg
/doc/
/Meta/
5 changes: 3 additions & 2 deletions DESCRIPTION
View file
Open in desktop
Original file line number Diff line number Diff line change
Expand Up @@ -69,6 +69,7 @@ Suggests:
MASS,
nestcolor (>= 0.1.0),
pkgload,
roxy.shinylive,
rlang (>= 1.0.0),
rmarkdown (>= 2.23),
rtables (>= 0.6.8),
Expand All @@ -92,12 +93,12 @@ Config/Needs/verdepcheck: haleyjeppson/ggmosaic, tidyverse/ggplot2,
aphalo/ggpmisc, aphalo/ggpp, slowkow/ggrepel, baddstats/goftest,
gridExtra, ramnathv/htmlwidgets, jeroen/jsonlite, yihui/knitr,
daroczig/logger, deepayan/lattice, MASS,
insightsengineering/nestcolor, r-lib/rlang, rstudio/rmarkdown,
insightsengineering/nestcolor, insightsengineering/roxy.shinylive, r-lib/rlang, rstudio/rmarkdown,
insightsengineering/rtables, tidyverse/rvest, sparkline,
rstudio/shinytest2, r-lib/testthat, r-lib/withr
Config/Needs/website: insightsengineering/nesttemplate
Encoding: UTF-8
Language: en-US
LazyData: true
Roxygen: list(markdown = TRUE)
Roxygen: list(markdown = TRUE, packages = c("roxy.shinylive"))
RoxygenNote: 7.3.2
17 changes: 9 additions & 8 deletions R/tm_a_pca.R
View file
Open in desktop
Original file line number Diff line number Diff line change
Expand Up @@ -18,9 +18,11 @@
#'
#' @inherit shared_params return
#'
#' @examplesShinylive
#' library(teal.modules.general)
#' interactive <- function() TRUE
#' {{ next_example }}
#' @examples
#' library(teal.widgets)
#'
#' # general data example
#' data <- teal_data()
#' data <- within(data, {
Expand All @@ -45,9 +47,6 @@
#' multiple = TRUE
#' ),
#' filter = NULL
#' ),
#' ggplot2_args = ggplot2_args(
#' labs = list(subtitle = "Plot generated by PCA Module")
#' )
#' )
#' )
Expand All @@ -56,6 +55,11 @@
#' shinyApp(app$ui, app$server)
#' }
#'
#' @examplesShinylive
#' library(teal.modules.general)
#' interactive <- function() TRUE
#' {{ next_example }}
#' @examples
#' # CDISC data example
#' data <- teal_data()
#' data <- within(data, {
Expand All @@ -80,9 +84,6 @@
#' multiple = TRUE
#' ),
#' filter = NULL
#' ),
#' ggplot2_args = ggplot2_args(
#' labs = list(subtitle = "Plot generated by PCA Module")
#' )
#' )
#' )
Expand Down
19 changes: 9 additions & 10 deletions R/tm_a_regression.R
View file
Open in desktop
Original file line number Diff line number Diff line change
Expand Up @@ -42,10 +42,12 @@
#'
#' @inherit shared_params return
#'
#' @examplesShinylive
#' library(teal.modules.general)
#' interactive <- function() TRUE
#' {{ next_example }}
#' @examples
#' # general data example
#' library(teal.widgets)
#'
#' data <- teal_data()
#' data <- within(data, {
#' require(nestcolor)
Expand Down Expand Up @@ -77,9 +79,6 @@
#' multiple = TRUE,
#' fixed = FALSE
#' )
#' ),
#' ggplot2_args = ggplot2_args(
#' labs = list(subtitle = "Plot generated by Regression Module")
#' )
#' )
#' )
Expand All @@ -88,9 +87,12 @@
#' shinyApp(app$ui, app$server)
#' }
#'
#' @examplesShinylive
#' library(teal.modules.general)
#' interactive <- function() TRUE
#' {{ next_example }}
#' @examples
#' # CDISC data example
#' library(teal.widgets)
#'
#' data <- teal_data()
#' data <- within(data, {
#' require(nestcolor)
Expand Down Expand Up @@ -123,9 +125,6 @@
#' multiple = TRUE,
#' fixed = FALSE
#' )
#' ),
#' ggplot2_args = ggplot2_args(
#' labs = list(subtitle = "Plot generated by Regression Module")
#' )
#' )
#' )
Expand Down
9 changes: 9 additions & 0 deletions R/tm_data_table.R
View file
Open in desktop
Original file line number Diff line number Diff line change
Expand Up @@ -29,6 +29,10 @@
#'
#' @inherit shared_params return
#'
#' @examplesShinylive
#' library(teal.modules.general)
#' interactive <- function() TRUE
#' {{ next_example }}
#' @examples
#' # general data example
#' data <- teal_data()
Expand All @@ -53,6 +57,11 @@
#' shinyApp(app$ui, app$server)
#' }
#'
#' @examplesShinylive
#' library(teal.modules.general)
#' interactive <- function() TRUE
#' {{ next_example }}
#' @examples
#' # CDISC data example
#' data <- teal_data()
#' data <- within(data, {
Expand Down
4 changes: 4 additions & 0 deletions R/tm_file_viewer.R
View file
Open in desktop
Original file line number Diff line number Diff line change
Expand Up @@ -13,6 +13,10 @@
#'
#' @inherit shared_params return
#'
#' @examplesShinylive
#' library(teal.modules.general)
#' interactive <- function() TRUE
#' {{ next_example }}
#' @examples
#' data <- teal_data()
#' data <- within(data, {
Expand Down
4 changes: 4 additions & 0 deletions R/tm_front_page.R
View file
Open in desktop
Original file line number Diff line number Diff line change
Expand Up @@ -17,6 +17,10 @@
#'
#' @inherit shared_params return
#'
#' @examplesShinylive
#' library(teal.modules.general)
#' interactive <- function() TRUE
#' {{ next_example }}
#' @examples
#' data <- teal_data()
#' data <- within(data, {
Expand Down
17 changes: 9 additions & 8 deletions R/tm_g_association.R
View file
Open in desktop
Original file line number Diff line number Diff line change
Expand Up @@ -25,9 +25,11 @@
#'
#' @inherit shared_params return
#'
#' @examplesShinylive
#' library(teal.modules.general)
#' interactive <- function() TRUE
#' {{ next_example }}
#' @examples
#' library(teal.widgets)
#'
#' # general data example
#' data <- teal_data()
#' data <- within(data, {
Expand Down Expand Up @@ -60,9 +62,6 @@
#' multiple = TRUE,
#' fixed = FALSE
#' )
#' ),
#' ggplot2_args = ggplot2_args(
#' labs = list(subtitle = "Plot generated by Association Module")
#' )
#' )
#' )
Expand All @@ -71,6 +70,11 @@
#' shinyApp(app$ui, app$server)
#' }
#'
#' @examplesShinylive
#' library(teal.modules.general)
#' interactive <- function() TRUE
#' {{ next_example }}
#' @examples
#' # CDISC data example
#' data <- teal_data()
#' data <- within(data, {
Expand Down Expand Up @@ -108,9 +112,6 @@
#' multiple = TRUE,
#' fixed = FALSE
#' )
#' ),
#' ggplot2_args = ggplot2_args(
#' labs = list(subtitle = "Plot generated by Association Module")
#' )
#' )
#' )
Expand Down
18 changes: 9 additions & 9 deletions R/tm_g_bivariate.R
View file
Open in desktop
Original file line number Diff line number Diff line change
Expand Up @@ -46,9 +46,11 @@
#'
#' @inherit shared_params return
#'
#' @examplesShinylive
#' library(teal.modules.general)
#' interactive <- function() TRUE
#' {{ next_example }}
#' @examples
#' library(teal.widgets)
#'
#' # general data example
#' data <- teal_data()
#' data <- within(data, {
Expand Down Expand Up @@ -96,17 +98,18 @@
#' selected = "Treatment",
#' fixed = FALSE
#' )
#' ),
#' ggplot2_args = ggplot2_args(
#' labs = list(subtitle = "Plot generated by Bivariate Module")
#' )
#' )
#' )
#' if (interactive()) {
#' shinyApp(app$ui, app$server)
#' }
#'
#'
#' @examplesShinylive
#' library(teal.modules.general)
#' interactive <- function() TRUE
#' {{ next_example }}
#' @examples
#' # CDISC data example
#' data <- teal_data()
#' data <- within(data, {
Expand Down Expand Up @@ -155,9 +158,6 @@
#' selected = "COUNTRY",
#' fixed = FALSE
#' )
#' ),
#' ggplot2_args = ggplot2_args(
#' labs = list(subtitle = "Plot generated by Bivariate Module")
#' )
#' )
#' )
Expand Down
23 changes: 14 additions & 9 deletions R/tm_g_distribution.R
View file
Open in desktop
Original file line number Diff line number Diff line change
Expand Up @@ -27,9 +27,13 @@
#'
#' @inherit shared_params return
#'
#' @examples
#' library(teal.widgets)
#'
#' @examplesShinylive
#' library(teal.modules.general)
#' interactive <- function() TRUE
#' {{ next_example }}
# nolint start: line_length_linter.
#' @examplesIf require("ggpmisc", quietly = TRUE) && require("ggpp", quietly = TRUE) && require("goftest", quietly = TRUE) && require("MASS", quietly = TRUE) && require("broom", quietly = TRUE)
# nolint end: line_length_linter.
#' # general data example
#' data <- teal_data()
#' data <- within(data, {
Expand All @@ -44,9 +48,6 @@
#' dist_var = data_extract_spec(
#' dataname = "iris",
#' select = select_spec(variable_choices("iris"), "Petal.Length")
#' ),
#' ggplot2_args = ggplot2_args(
#' labs = list(subtitle = "Plot generated by Distribution Module")
#' )
#' )
#' )
Expand All @@ -55,6 +56,13 @@
#' shinyApp(app$ui, app$server)
#' }
#'
#' @examplesShinylive
#' library(teal.modules.general)
#' interactive <- function() TRUE
#' {{ next_example }}
# nolint start: line_length_linter.
#' @examplesIf require("ggpmisc", quietly = TRUE) && require("ggpp", quietly = TRUE) && require("goftest", quietly = TRUE) && require("MASS", quietly = TRUE) && require("broom", quietly = TRUE)
# nolint end: line_length_linter.
#' # CDISC data example
#' data <- teal_data()
#' data <- within(data, {
Expand Down Expand Up @@ -94,9 +102,6 @@
#' vars = vars1,
#' multiple = TRUE
#' )
#' ),
#' ggplot2_args = ggplot2_args(
#' labs = list(subtitle = "Plot generated by Distribution Module")
#' )
#' )
#' )
Expand Down
19 changes: 9 additions & 10 deletions R/tm_g_response.R
View file
Open in desktop
Original file line number Diff line number Diff line change
Expand Up @@ -39,10 +39,12 @@
#' @note For more examples, please see the vignette "Using response plot" via
#' `vignette("using-response-plot", package = "teal.modules.general")`.
#'
#' @examplesShinylive
#' library(teal.modules.general)
#' interactive <- function() TRUE
#' {{ next_example }}
#' @examples
#' # general data example
#' library(teal.widgets)
#'
#' data <- teal_data()
#' data <- within(data, {
#' require(nestcolor)
Expand Down Expand Up @@ -77,9 +79,6 @@
#' multiple = FALSE,
#' fixed = FALSE
#' )
#' ),
#' ggplot2_args = ggplot2_args(
#' labs = list(subtitle = "Plot generated by Response Module")
#' )
#' )
#' )
Expand All @@ -88,9 +87,12 @@
#' shinyApp(app$ui, app$server)
#' }
#'
#' @examplesShinylive
#' library(teal.modules.general)
#' interactive <- function() TRUE
#' {{ next_example }}
#' @examples
#' # CDISC data example
#' library(teal.widgets)
#'
#' data <- teal_data()
#' data <- within(data, {
#' require(nestcolor)
Expand Down Expand Up @@ -123,9 +125,6 @@
#' multiple = FALSE,
#' fixed = FALSE
#' )
#' ),
#' ggplot2_args = ggplot2_args(
#' labs = list(subtitle = "Plot generated by Response Module")
#' )
#' )
#' )
Expand Down
Loading