mirror of
https://github.com/johrpan/ubigen.git
synced 2025-10-26 19:57:24 +01:00
Add CMap dataset
This commit is contained in:
parent
375c5b27ba
commit
6ef80483d2
7 changed files with 57 additions and 2 deletions
3
R/data.R
3
R/data.R
|
|
@ -10,3 +10,6 @@
|
|||
#' The results from the analysis across Human Protein Atlas' tissue aggregated
|
||||
#' data.
|
||||
"hpa_tissues"
|
||||
|
||||
#' The results from the analysis on CMap data.
|
||||
"cmap"
|
||||
|
|
@ -9,6 +9,8 @@ server <- function(custom_dataset = NULL) {
|
|||
ubigen::hpa_tissues
|
||||
} else if (input$dataset == "gtex_all") {
|
||||
ubigen::gtex_all
|
||||
} else if (input$dataset == "cmap") {
|
||||
ubigen::cmap
|
||||
} else {
|
||||
custom_dataset
|
||||
}
|
||||
|
|
|
|||
3
R/ui.R
3
R/ui.R
|
|
@ -26,7 +26,8 @@ ui <- function(custom_dataset = NULL) {
|
|||
choices <- list(
|
||||
"GTEx (across tissues and conditions)" = "gtex_all",
|
||||
"GTEx (across tissues)" = "gtex_tissues",
|
||||
"Human Protein Atlas (across tissues)" = "hpa_tissues"
|
||||
"Human Protein Atlas (across tissues)" = "hpa_tissues",
|
||||
"CMap" = "cmap"
|
||||
)
|
||||
|
||||
if (!is.null(custom_dataset)) {
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue