-
Notifications
You must be signed in to change notification settings - Fork 1
Expand file tree
/
Copy pathapp.R
More file actions
82 lines (72 loc) · 3.98 KB
/
app.R
File metadata and controls
82 lines (72 loc) · 3.98 KB
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
############################################################################
# VisioProt-MS: Interactive 2D maps from intact protein mass spectrometry
# Copyright CNRS 2017
# Contributor : Marie Locard-Paulet (21/11/2017) [[email protected]]
#
# DESCRIPTION:
# This software is a computer program whose purpose is to visualize and inspect
# deconvoluted MS 2D maps from intact protein mass spectrometry experiments.
# It supports various deconvolution software outputs including:
# - RoWinPro and Bruker DataAnalysis
# - BioPharma Finder (Thermo Fisher Scientific)
# - ProMex (Pacific Northwest National Laboratory)
# - TopPIC (University of California, San Diego)
#
# The application can operate in two modes:
# 1. MS mode: Visualization of deconvoluted MS1 data only
# 2. MS/MS mode: Overlay of top-down MS/MS identification results on MS1 data
#
# LICENSE:
# This software is governed by the CeCILL license under French law and abiding
# by the rules of distribution of free software. You can use, modify and/or
# redistribute the software under the terms of the CeCILL license as circulated
# by CEA, CNRS and INRIA at the following URL "http://www.cecill.info".
# As a counterpart to the access to the source code and rights to copy, modify
# and redistribute granted by the license, users are provided only with a limited
# warranty and the software's author, the holder of the economic rights, and the
# successive licensors have only limited liability. In this respect, the user's
# attention is drawn to the risks associated with loading, using, modifying and/or
# developing or reproducing the software by the user in light of its specific
# status of free software, that may mean that it is complicated to manipulate,
# and that also therefore means that it is reserved for developers and experienced
# professionals having in-depth computer knowledge. Users are therefore encouraged
# to load and test the software's suitability as regards their requirements in
# conditions enabling the security of their systems and/or data to be ensured and,
# more generally, to use and operate it in the same conditions as regards security.
# The fact that you are presently reading this means that you have had knowledge
# of the CeCILL license and that you accept its terms.
############################################################################
############################################################################
# REQUIRED PACKAGES AND GLOBAL CONFIGURATION
############################################################################
# Core Shiny framework for building interactive web applications
library(shiny)
# Advanced plotting libraries
# devtools::install_github('hadley/ggplot2') # Use development version if needed
library(ggplot2) # Grammar of graphics for static plots
library(plotly) # Interactive web-based data visualization
library(dplyr) # Data manipulation and transformation
# Visualization and UI enhancement packages
library(RColorBrewer) # Color palettes for data visualization
library(shinyBS) # Bootstrap components for Shiny (tooltips, modals, etc.)
library(data.table) # High-performance data manipulation and reading
# Global application settings
options(shiny.maxRequestSize=90*1024^2) # Set maximum upload size to 90MB for large MS files
############################################################################
# UI
############################################################################
source("ui.R")
############################################################################
# SERVER
############################################################################
source("server.R")
# ====================
# APPLICATION LAUNCH
# ====================
# Launch the Shiny application with the defined UI and server components
shinyApp(ui = ui, server = server)
# ====================
# DEPLOYMENT CONFIGURATION
# ====================
# Deployment command for shinyapps.io or RStudio Connect (commented out)
# rsconnect::deployApp("T:/RRelatedWork/VisioProt-MS")