Skip to content

Commit d9fd08b

Browse files
authored
1 parent ae01110 commit d9fd08b

12 files changed

+41
-26
lines changed

โ€Ž.github/workflows/scheduled.yamlโ€Ž

Lines changed: 15 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -56,6 +56,19 @@ jobs:
5656
)
5757
name: revdepcheck โ†ฉ๏ธ
5858
uses: insightsengineering/r.pkg.template/.github/workflows/revdepcheck.yaml@main
59+
with:
60+
lookup-refs: |
61+
insightsengineering/roxy.shinylive
62+
insightsengineering/teal
63+
insightsengineering/teal.transform
64+
insightsengineering/teal.code
65+
insightsengineering/teal.data
66+
insightsengineering/teal.slice
67+
insightsengineering/teal.logger
68+
insightsengineering/teal.reporter
69+
insightsengineering/teal.widgets
70+
insightsengineering/tern
71+
insightsengineering/rtables
5972
rhub:
6073
if: >
6174
github.event_name == 'schedule' || (
@@ -66,10 +79,12 @@ jobs:
6679
uses: insightsengineering/r.pkg.template/.github/workflows/rhub.yaml@main
6780
with:
6881
lookup-refs: |
82+
insightsengineering/roxy.shinylive
6983
insightsengineering/teal
7084
insightsengineering/teal.transform
7185
insightsengineering/teal.code
7286
insightsengineering/teal.data
87+
insightsengineering/teal.slice
7388
insightsengineering/teal.logger
7489
insightsengineering/teal.reporter
7590
insightsengineering/teal.widgets

โ€ŽDESCRIPTIONโ€Ž

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -81,7 +81,7 @@ Suggests:
8181
VignetteBuilder:
8282
knitr
8383
Config/Needs/verdepcheck: haleyjeppson/ggmosaic, tidyverse/ggplot2,
84-
rstudio/shiny, insightsengineering/teal,
84+
rstudio/shiny, insightsengineering/teal,
8585
insightsengineering/teal.transform, mllg/checkmate, tidyverse/dplyr,
8686
rstudio/DT, tidyverse/forcats, r-lib/scales, daattali/shinyjs,
8787
shinyTree/shinyTree, rstudio/shinyvalidate, dreamRs/shinyWidgets,

โ€Žvignettes/teal-modules-general.Rmdโ€Ž

Lines changed: 4 additions & 4 deletions
Original file line numberDiff line numberDiff line change
@@ -39,7 +39,7 @@ See [package functions / modules](https://insightsengineering.github.io/teal.mod
3939
### Example application
4040

4141
A simple application featuring the `tm_variable_browser()` module:
42-
```{r app, message = FALSE, results = "hide"}
42+
```{r app, message = FALSE, results = "hide", eval = requireNamespace("sparkline", quietly = TRUE)}
4343
# load libraries
4444
library(teal.modules.general)
4545
library(teal.widgets)
@@ -78,7 +78,7 @@ shinyApp(app$ui, app$server)
7878

7979
### Try it out in Shinylive
8080

81-
```{r shinylive_url, echo = FALSE, results = 'asis'}
81+
```{r shinylive_url, echo = FALSE, results = 'asis', eval = requireNamespace("roxy.shinylive", quietly = TRUE)}
8282
code <- paste0(c(
8383
knitr::knit_code$get("app"),
8484
knitr::knit_code$get("shinyapp")
@@ -88,7 +88,7 @@ url <- roxy.shinylive::create_shinylive_url(code)
8888
cat(sprintf("[Open in Shinylive](%s)\n\n", url))
8989
```
9090

91-
```{r shinylive_iframe, echo = FALSE, out.width = '150%', out.extra = 'style = "position: relative; z-index:1"', eval = knitr::is_html_output() && identical(Sys.getenv("IN_PKGDOWN"), "true")}
91+
```{r shinylive_iframe, echo = FALSE, out.width = '150%', out.extra = 'style = "position: relative; z-index:1"', eval = requireNamespace("roxy.shinylive", quietly = TRUE) && knitr::is_html_output() && identical(Sys.getenv("IN_PKGDOWN"), "true")}
9292
knitr::include_url(url, height = "800px")
9393
```
9494

@@ -146,7 +146,7 @@ In a `teal` app, data and modules are decoupled. In the app above:
146146
- The app developer specified the module and assigned it to the `modules` argument.
147147
- The `init` function took these arguments and returned a list containing `ui` and `server` object, which can be demonstrated by running:
148148

149-
```{r, indent = " "}
149+
```{r, indent = " ", eval = requireNamespace("sparkline", quietly = TRUE)}
150150
class(app)
151151
names(app)
152152
```

โ€Žvignettes/using-association-plot.Rmdโ€Ž

Lines changed: 2 additions & 2 deletions
Original file line numberDiff line numberDiff line change
@@ -304,7 +304,7 @@ shinyApp(app$ui, app$server, options = list(height = 1024, width = 1024))
304304

305305
## 5 - Try it out in Shinylive
306306

307-
```{r shinylive_url, echo = FALSE, results = 'asis'}
307+
```{r shinylive_url, echo = FALSE, results = 'asis', eval = requireNamespace("roxy.shinylive", quietly = TRUE)}
308308
code <- paste0(c(
309309
knitr::knit_code$get("library"),
310310
knitr::knit_code$get("data"),
@@ -316,6 +316,6 @@ url <- roxy.shinylive::create_shinylive_url(code)
316316
cat(sprintf("[Open in Shinylive](%s)\n\n", url))
317317
```
318318

319-
```{r shinylive_iframe, echo = FALSE, out.width = '150%', out.extra = 'style = "position: relative; z-index:1"', eval = knitr::is_html_output() && identical(Sys.getenv("IN_PKGDOWN"), "true")}
319+
```{r shinylive_iframe, echo = FALSE, out.width = '150%', out.extra = 'style = "position: relative; z-index:1"', eval = requireNamespace("roxy.shinylive", quietly = TRUE) && knitr::is_html_output() && identical(Sys.getenv("IN_PKGDOWN"), "true")}
320320
knitr::include_url(url, height = "800px")
321321
```

โ€Žvignettes/using-bivariate-plot.Rmdโ€Ž

Lines changed: 2 additions & 2 deletions
Original file line numberDiff line numberDiff line change
@@ -630,7 +630,7 @@ shinyApp(app$ui, app$server, options = list(height = 1024, width = 1024))
630630

631631
## 5 - Try it out in Shinylive
632632

633-
```{r shinylive_url, echo = FALSE, results = 'asis'}
633+
```{r shinylive_url, echo = FALSE, results = 'asis', eval = requireNamespace("roxy.shinylive", quietly = TRUE)}
634634
code <- paste0(c(
635635
knitr::knit_code$get("library"),
636636
knitr::knit_code$get("data"),
@@ -642,6 +642,6 @@ url <- roxy.shinylive::create_shinylive_url(code)
642642
cat(sprintf("[Open in Shinylive](%s)\n\n", url))
643643
```
644644

645-
```{r shinylive_iframe, echo = FALSE, out.width = '150%', out.extra = 'style = "position: relative; z-index:1"', eval = knitr::is_html_output() && identical(Sys.getenv("IN_PKGDOWN"), "true")}
645+
```{r shinylive_iframe, echo = FALSE, out.width = '150%', out.extra = 'style = "position: relative; z-index:1"', eval = requireNamespace("roxy.shinylive", quietly = TRUE) && knitr::is_html_output() && identical(Sys.getenv("IN_PKGDOWN"), "true")}
646646
knitr::include_url(url, height = "800px")
647647
```

โ€Žvignettes/using-cross-table.Rmdโ€Ž

Lines changed: 2 additions & 2 deletions
Original file line numberDiff line numberDiff line change
@@ -147,7 +147,7 @@ shinyApp(app$ui, app$server, options = list(height = 1024, width = 1024))
147147

148148
## 5 - Try it out in Shinylive
149149

150-
```{r shinylive_url, echo = FALSE, results = 'asis'}
150+
```{r shinylive_url, echo = FALSE, results = 'asis', eval = requireNamespace("roxy.shinylive", quietly = TRUE)}
151151
code <- paste0(c(
152152
knitr::knit_code$get("library"),
153153
knitr::knit_code$get("data"),
@@ -159,6 +159,6 @@ url <- roxy.shinylive::create_shinylive_url(code)
159159
cat(sprintf("[Open in Shinylive](%s)\n\n", url))
160160
```
161161

162-
```{r shinylive_iframe, echo = FALSE, out.width = '150%', out.extra = 'style = "position: relative; z-index:1"', eval = knitr::is_html_output() && identical(Sys.getenv("IN_PKGDOWN"), "true")}
162+
```{r shinylive_iframe, echo = FALSE, out.width = '150%', out.extra = 'style = "position: relative; z-index:1"', eval = requireNamespace("roxy.shinylive", quietly = TRUE) && knitr::is_html_output() && identical(Sys.getenv("IN_PKGDOWN"), "true")}
163163
knitr::include_url(url, height = "800px")
164164
```

โ€Žvignettes/using-data-table.Rmdโ€Ž

Lines changed: 2 additions & 2 deletions
Original file line numberDiff line numberDiff line change
@@ -117,7 +117,7 @@ shinyApp(app$ui, app$server, options = list(height = 1024, width = 1024))
117117

118118
## 5 - Try it out in Shinylive
119119

120-
```{r shinylive_url, echo = FALSE, results = 'asis'}
120+
```{r shinylive_url, echo = FALSE, results = 'asis', eval = requireNamespace("roxy.shinylive", quietly = TRUE)}
121121
code <- paste0(c(
122122
knitr::knit_code$get("library"),
123123
knitr::knit_code$get("data"),
@@ -129,6 +129,6 @@ url <- roxy.shinylive::create_shinylive_url(code)
129129
cat(sprintf("[Open in Shinylive](%s)\n\n", url))
130130
```
131131

132-
```{r shinylive_iframe, echo = FALSE, out.width = '150%', out.extra = 'style = "position: relative; z-index:1"', eval = knitr::is_html_output() && identical(Sys.getenv("IN_PKGDOWN"), "true")}
132+
```{r shinylive_iframe, echo = FALSE, out.width = '150%', out.extra = 'style = "position: relative; z-index:1"', eval = requireNamespace("roxy.shinylive", quietly = TRUE) && knitr::is_html_output() && identical(Sys.getenv("IN_PKGDOWN"), "true")}
133133
knitr::include_url(url, height = "800px")
134134
```

โ€Žvignettes/using-outliers-module.Rmdโ€Ž

Lines changed: 2 additions & 2 deletions
Original file line numberDiff line numberDiff line change
@@ -198,7 +198,7 @@ shinyApp(app$ui, app$server, options = list(height = 1024, width = 1024))
198198

199199
## 5 - Try it out in Shinylive
200200

201-
```{r shinylive_url, echo = FALSE, results = 'asis'}
201+
```{r shinylive_url, echo = FALSE, results = 'asis', eval = requireNamespace("roxy.shinylive", quietly = TRUE)}
202202
code <- paste0(c(
203203
knitr::knit_code$get("library"),
204204
knitr::knit_code$get("data"),
@@ -210,6 +210,6 @@ url <- roxy.shinylive::create_shinylive_url(code)
210210
cat(sprintf("[Open in Shinylive](%s)\n\n", url))
211211
```
212212

213-
```{r shinylive_iframe, echo = FALSE, out.width = '150%', out.extra = 'style = "position: relative; z-index:1"', eval = knitr::is_html_output() && identical(Sys.getenv("IN_PKGDOWN"), "true")}
213+
```{r shinylive_iframe, echo = FALSE, out.width = '150%', out.extra = 'style = "position: relative; z-index:1"', eval = requireNamespace("roxy.shinylive", quietly = TRUE) && knitr::is_html_output() && identical(Sys.getenv("IN_PKGDOWN"), "true")}
214214
knitr::include_url(url, height = "800px")
215215
```

โ€Žvignettes/using-regression-plots.Rmdโ€Ž

Lines changed: 2 additions & 2 deletions
Original file line numberDiff line numberDiff line change
@@ -277,7 +277,7 @@ shinyApp(app$ui, app$server, options = list(height = 1024, width = 1024))
277277

278278
## 5 - Try it out in Shinylive
279279

280-
```{r shinylive_url, echo = FALSE, results = 'asis'}
280+
```{r shinylive_url, echo = FALSE, results = 'asis', eval = requireNamespace("roxy.shinylive", quietly = TRUE)}
281281
code <- paste0(c(
282282
knitr::knit_code$get("library"),
283283
knitr::knit_code$get("data"),
@@ -289,6 +289,6 @@ url <- roxy.shinylive::create_shinylive_url(code)
289289
cat(sprintf("[Open in Shinylive](%s)\n\n", url))
290290
```
291291

292-
```{r shinylive_iframe, echo = FALSE, out.width = '150%', out.extra = 'style = "position: relative; z-index:1"', eval = knitr::is_html_output() && identical(Sys.getenv("IN_PKGDOWN"), "true")}
292+
```{r shinylive_iframe, echo = FALSE, out.width = '150%', out.extra = 'style = "position: relative; z-index:1"', eval = requireNamespace("roxy.shinylive", quietly = TRUE) && knitr::is_html_output() && identical(Sys.getenv("IN_PKGDOWN"), "true")}
293293
knitr::include_url(url, height = "800px")
294294
```

โ€Žvignettes/using-response-plot.Rmdโ€Ž

Lines changed: 2 additions & 2 deletions
Original file line numberDiff line numberDiff line change
@@ -386,7 +386,7 @@ shinyApp(app$ui, app$server, options = list(height = 1024, width = 1024))
386386

387387
## 5 - Try it out in Shinylive
388388

389-
```{r shinylive_url, echo = FALSE, results = 'asis'}
389+
```{r shinylive_url, echo = FALSE, results = 'asis', eval = requireNamespace("roxy.shinylive", quietly = TRUE)}
390390
code <- paste0(c(
391391
knitr::knit_code$get("library"),
392392
knitr::knit_code$get("data"),
@@ -398,6 +398,6 @@ url <- roxy.shinylive::create_shinylive_url(code)
398398
cat(sprintf("[Open in Shinylive](%s)\n\n", url))
399399
```
400400

401-
```{r shinylive_iframe, echo = FALSE, out.width = '150%', out.extra = 'style = "position: relative; z-index:1"', eval = knitr::is_html_output() && identical(Sys.getenv("IN_PKGDOWN"), "true")}
401+
```{r shinylive_iframe, echo = FALSE, out.width = '150%', out.extra = 'style = "position: relative; z-index:1"', eval = requireNamespace("roxy.shinylive", quietly = TRUE) && knitr::is_html_output() && identical(Sys.getenv("IN_PKGDOWN"), "true")}
402402
knitr::include_url(url, height = "800px")
403403
```

0 commit comments

Comments
ย (0)