R/app.R

In retistruct: Retinal Reconstruction Program

##' Start the Retistruct GUI
##' @return Object with \code{getData()} method to return
##' reconstructed retina data and environment \code{this} which
##' contains variables in object.
##' @importFrom shiny shinyApp
##' @export
retistruct <- function() {
  ## Ensure options are reset on exit
  oldop <- options()
  on.exit(options(oldop))

  options(rgl.useNULL = TRUE) ## Prevents rgl from making its own window
  shinyApp(ui = ui, server = server)
}