# Set some variables for the info badges
status <- "development-orange"
pkg_version <- paste(pkgload::pkg_version(), collapse = ".")

# Get badges based on variables (converted to png because Azure Devops doesn't render SVG)
download.file(url = paste0("https://img.shields.io/badge/version-", pkg_version, "-blue.svg"),
              destfile = "inst/static/pkg-version-badge.svg")
rsvg::rsvg_png(svg = "inst/static/pkg-version-badge.svg",
               file = "inst/static/pkg-version-badge.png")

download.file(url = paste0("https://img.shields.io/badge/status-", status, ".svg"),
              destfile = "inst/static/app-status-badge.svg")
rsvg::rsvg_png(svg = "inst/static/app-status-badge.svg",
               file = "inst/static/app-status-badge.png")

advancedShiny

version: num status: status

The goal of advancedShiny is to provide an R Shiny application which can showcase some intermediate & advanced R Shiny techniques to DfE colleagues at Coffee & Coding sessions.

Installation

You can install advancedShiny from GitHub with:

# install.packages("devtools")
devtools::install_github("chrisbrownlie/advancedShiny")

Usage

The app can be run with the following command:

library(advancedShiny)
run_IAS_app()

More info

See TODO.md for a more detailed plan and structure of what the app will contain or contact Chris Brownlie for more information.

Acknowledgements

Thanks to the RStudio team for the shiny package, and to the people and organisations who have contributed to the development of shiny & R, including (but not limited to): Dean Attali, Appsilon, dreamRs, thinkR & Guangchang Yu. Much of this package and app builds from their work and I encourage you to check out their work if you want to become a shiny wizard.



chrisbrownlie/advancedShiny documentation built on Aug. 2, 2022, 3:29 a.m.