R/LRsim_demo.R

In jbryer/IRRsim: Simulate Inter-Rater Reliability Statistics

Defines functions LRsim_demo

Documented in LRsim_demo

#' Run the logistic regression shiny app.
#'
#' @export
LRsim_demo <- function() {
	dir <- paste0(find.package('IRRsim'), '/lr_shiny')
	message(paste0("Running shiny app from ", dir))
	shiny::runApp(appDir = dir)
}