Commit d7f5ec1f authored by Thomas Schwarzl's avatar Thomas Schwarzl

removed venneuler package

parent acaa8538
......@@ -4,7 +4,7 @@ suppressPackageStartupMessages({
require(RVenn)
require(ggExtra)
require(cowplot)
require(venneuler)
#require(venneuler)
})
......@@ -164,11 +164,13 @@ RBPbaseDataHandler <- R6::R6Class("RBPbaseDataHandler",
return(all(ids %in% x))
},
# check if id exists in rbpbase for organism (includes any_Hs etC)
# check if id exists in rbpbase for organism (includes any_* etc)
assert_ids_in_rbpbase_for_organism = function(ids, organism) {
stopifnot(is.character(ids))
stopifnot(is.character(organism))
x <- colnames(self$COMPILED_TABLE[[organism]])
if(!self$is_ids_in_rbpbase_for_organism(ids, organism)) {
notin <- ids[ !ids %in% x ]
stop(paste0("Ids ", paste(notin, collapse = ", "), " does not exist in RBPbase"))
......
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