Commit 9f08a922 authored by Lena Hersemann's avatar Lena Hersemann

extend guess_mart to Chinese hamster (cchok1gshd_gene_ensembl)

parent 7ea79694
......@@ -61,6 +61,8 @@ guess_mart <- function(gene_id){
return("hsapiens_gene_ensembl")
}else if(str_detect(an_id, "FBgn")){
return("dmelanogaster_gene_ensembl")
} else if(str_detect(an_id, "ENSCGRG")){
return("cchok1gshd_gene_ensembl")
}else{
stop(paste("could not guess mart from ", an_id))
}
......
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