Skip to content
GitLab
Menu
Projects
Groups
Snippets
/
Help
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Contribute to GitLab
Sign in / Register
Toggle navigation
Menu
Open sidebar
Bagueneau Mathias
Shiny SChnurR
Commits
8a6f6ab8
Commit
8a6f6ab8
authored
May 10, 2019
by
Bagueneau Mathias
Browse files
- Bug fix
- Update install.R
parent
c1798a56
Changes
2
Hide whitespace changes
Inline
Side-by-side
app.R
View file @
8a6f6ab8
...
...
@@ -280,16 +280,17 @@ server <- function(input, output, session) {
selectInput
(
inputId
=
"file"
,
label
=
"Or choose a file :"
,
choices
=
c
(
""
,
list.files
(
path
=
"./data"
,
full.names
=
FALSE
,
recursive
=
FALSE
)))
})
# ## Creating a usefull object for filedata (readable & writable) and assay gestion --------
# wrfile <- reactive ({
# wrdata <- filedata$data
# if (!is.null(wrdata@assays$SCT)) {
# DefaultAssay(wrdata) <- "SCT"
# } else {
# DefaultAssay(wrdata) <- "RNA"
# }
# return (wrdata)
# })
## Creating a usefull object for filedata (readable & writable) and assay gestion --------
wrfile
<-
reactive
({
req
(
filedata
$
data
)
wrdata
<-
filedata
$
data
if
(
!
is.null
(
wrdata
@
assays
$
SCT
))
{
DefaultAssay
(
wrdata
)
<-
"SCT"
}
else
{
DefaultAssay
(
wrdata
)
<-
"RNA"
}
return
(
wrdata
)
})
## Graphs & one table Generations --------
...
...
install.R
View file @
8a6f6ab8
...
...
@@ -23,5 +23,4 @@ devtools::install_github(repo = 'ChristophH/sctransform')
BiocManager
::
install
(
"clusterProfiler"
)
BiocManager
::
install
(
"MAST"
)
BiocManager
::
install
(
"org.Hs.eg.db"
)
BiocManager
::
install
(
"PANTHER.db"
)
# BiocManager::install("topGO")
\ No newline at end of file
BiocManager
::
install
(
"PANTHER.db"
)
\ No newline at end of file
Write
Preview
Supports
Markdown
0%
Try again
or
attach a new file
.
Attach a file
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Cancel
Please
register
or
sign in
to comment