In nevrome/rrtools.addin: A graphical user interface for some of the main functions of the rrtools package

rrtools.addin

This package provides a graphical user interface for some of the main functions of Ben Marwick's rrtools package.

# take screenshot of every panel
panels <- c("Overview", "Setup", "License", "Readme", "File structure", "Virtualisation", "CI", "Tests")
for (i in seq_along(panels)) {
  system(
    paste0("timeout 3 R -e \"shiny::runApp(rrtools.addin::rrtools_assistant(startpanel = '", panels[i], "', run_app = FALSE), port = 8081, launch.browser = FALSE)\""), 
    wait = FALSE
  )
  Sys.sleep(1)
  webshot::webshot(url = "http://127.0.0.1:8081/", file = paste0("inst/gif/webshot_", 100 + i, "_", ".png"), vwidth = 1200, vheight = 500)
  Sys.sleep(1)
}
# make gif from individual screenshots
system("convert -delay 150 -loop 0 inst/gif/*.png inst/gif/rrtools_addin_demo.gif")

Installation

# install.packages("devtools")
devtools::install_github("benmarwick/rrtools")
devtools::install_github("nevrome/rrtools.addin")

How to use

rrtools.addin::rrtools_assistant()

nevrome/rrtools.addin documentation built on Nov. 8, 2022, 3:34 a.m.