#' Run the graphical interface for PopED
#'
#'
#' @export
#'
poped_gui <- function(){
if (!requireNamespace("shiny", quietly = TRUE)) {
stop("shiny package needed for this function to work. Please install it.",
call. = FALSE)
}
if (!requireNamespace("rhandsontable", quietly = TRUE)) {
stop("rhandsontable package needed for this function to work. Please install it.",
call. = FALSE)
}
shiny::runApp(system.file('shinyapp', package='PopED'))
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.