suppressPackageStartupMessages({
    library(SOUNDBoard)
    library(shiny)
})

suppressMessages({
    x <- SOUNDManager(getwd())
})

Board and case summary

tbl(x, "board") %>% 
    filter(board_uid == "Mitochondrial Diseases") %>% 
    sbreport()

tbl(x, "cases") %>% filter(case_uid == "PATIENT_1") %>%
    select(-board_uid) %>% sbreport()

Tabular information (interactive)

tbl(x, "assay") %>%
    filter(case_uid == "PATIENT_1", assay == "data.frame") %>%
    sbreport()

Graphical information (interactive)

tbl(x, "assay") %>%
    filter(case_uid == "PATIENT_1", assay == "ggplot") %>%
    sbreport()

Computation 'widgets'

tbl(x, "assay") %>%
    filter(case_uid == "PATIENT_1", assay == "shiny") %>%
    sbreport()


Bioconductor/SOUNDBoard documentation built on May 6, 2019, 7:52 a.m.