Commit 1e56cf73 authored by Holger Brandl's avatar Holger Brandl

resolved discard overload ambiguity

parent a24904e8
......@@ -99,7 +99,7 @@ load_pack(digest)
## common plotting requirements since they are omnipresent
load_pack(ggplot2)
load_pack(scales, warn_conflicts = F)
load_pack(scales, warn_conflicts = F) # note this has a known conflit with purrr::discard
load_pack(grid)
## for table exploration without using Rstudio
......@@ -588,7 +588,7 @@ add_prefix = function(filename) {
interp_from_env = function(path){
# DEBUG path="${genomeFasta}.algncounts.txt"
e <- new.env()
env = Sys.getenv() %>% discard(~ str_detect(.x, fixed("()")))
env = Sys.getenv() %>% purrr::discard(~ str_detect(.x, fixed("()")))
paste0(make.names(names(env)), "='", gsub("'", '', env) %>% str_replace_all(fixed("\\"), ""), "'") %>%
map(~eval(parse(text=.), envir=e))
# (system("export", intern=T) %>% str_split_fixed(" ", 2))[,2] %>% map(~eval(parse(text=.), envir=e))
......
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