hypeR-db

A hypeR repository for relational and flat genesets

Usage

get.rgsets <- function(rgsets) {
    url <- "https://github.com/montilab/hyperdb/raw/master/data/{0}.rds"
    temp <- tempfile(fileext=".rds")
    httr::GET(gsub("\\{0}", rgsets, url), 
              .send_headers = c("Accept" = "application/octet-stream"),
              httr::write_disk(temp, overwrite=TRUE))    
    return(readRDS(temp))
}

rgsets <- get.rgsets("REACTOME/REACTOME_v70.0")
rgsets <- get.rgsets("KEGG/KEGG_v92.0")