From 9f54e6aace486777eb026f250ccb3cb4ab133aeb Mon Sep 17 00:00:00 2001
From: Holger Brandl <brandl@mpi-cbg.de>
Date: Fri, 10 Apr 2015 10:46:38 +0200
Subject: [PATCH] added method to get ensembl build
---
R/bio/diffex_commons.R | 4 ++++
1 file changed, 4 insertions(+)
diff --git a/R/bio/diffex_commons.R b/R/bio/diffex_commons.R
index b63d5af..a7fafb5 100644
--- a/R/bio/diffex_commons.R
+++ b/R/bio/diffex_commons.R
@@ -33,6 +33,10 @@ guess_mart <- function(gene_id){
}
}
+get_ensembl_build <- function(){
+ biomaRt::listMarts() %>% as.data.frame() %>% filter(biomart=="ensembl") %>% with(str_match(version, " ([0-9]*) ")) %>% subset(select=2)
+}
+
guess_pathview_species <- function(gene_id){
an_id <-gene_id[1]
--
GitLab