Commit bc55ab8a authored by Holger Brandl's avatar Holger Brandl
Browse files

added ensembl helper method

parent 1e9b4889
......@@ -35,7 +35,17 @@ guess_mart <- function(gene_id){
}
}
map_ens_archive_to_build <- function(archiveName="mar2015"){
biomaRt::listMarts(host = paste0(archiveName,".archive.ensembl.org"), path = "/biomart/martservice") %>%
as.data.frame() %>%
filter(biomart=="ENSEMBL_MART_ENSEMBL") %>%
with(str_extract(version, "([0-9]{2})"))
}
get_ensembl_build <- function(){
warning("DEPRECATED Since it assumes that the default ensembl is used which is never a good idea")
biomaRt::listMarts() %>% as.data.frame() %>% filter(biomart=="ensembl") %>% with(str_match(version, " ([0-9]*) ")) %>% subset(select=2)
}
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment