R/launch_FOMM.R

In mariagrazialorusso/pMinShiny: A visual tool for the process mining analysis

#'@title FOMM module fun
#'
#'@import shiny
#'@import dplyr
#'@import shinyWidgets
#'@import DT
#'@export





FOMM.mod<-function(){
  all.data<<-list()
  all.path<<-list()
  shinyApp(ui =fluidPage(
    #Pagina Principale
    navbarPage("pMining: First Order Markov Model", id="tabs",
               tabPanel("Loading EventLog",
                        titlePanel("EventLog Uploading"),
                        br(),
                        import_mod_ui("uploadEL","Upload EventLog file",FALSE,col_setting=TRUE),
                        actionButton("loadEL","Load Event Log",width = '32%') ,

               )
    )
  ),

  server = server.FOMM)
}