inst/HiTMaP_GUI/app.R

In MASHUOA/HiTMaP: A collection of tools for imaging MS data processing

if (!require(shiny)) install.packages("shiny")
library(shiny)

if (!require(future)) install.packages("future")
library(future)

if (!require(DT)) devtools::install_github("rstudio/DT")
library(DT)

library(HiTMaP)

if (!require(data.table)) install.packages("data.table")
library(data.table)

if (!require(shinyFiles)) install.packages("shinyFiles")
library(shinyFiles)

if (!require(plotly)) devtools::install_github("ropensci/plotly@async")
library(plotly)

if (!require(htmlwidgets)) devtools::install_github("ramnathv/htmlwidgets")
library(htmlwidgets)


HiTMaP:::Peptide_modification(retrive_ID=NULL,update_unimod=F)
plan(multicore)
options(shiny.maxRequestSize = 3000*1024^2)



if (!exists("WorkingDir_global", envir=globalenv()))  WorkingDir_global<<-"~/expdata"


enableBookmarking("server")
shinyApp(ui = ui, server = server )