Commit 5ff36225 authored by Holger Brandl's avatar Holger Brandl

cont gene loss analysis

continued revised tx framework
parent 03c99e08
......@@ -42,7 +42,7 @@ if(!file.exists(r_script)){
## postfix a default empty yaml header
## todo maybe we should rather run it in the script-home-dir to ensure that additional resources (e.g. pngs are picked up correctly)
tmpScript <- tempfile(fileext=".R", tmpdir=getwd())
tmpScript <- tempfile(fileext=".R", tmpdir=dirname(normalizePath(r_script)))
#tmpScript <- "tt.R"
......
......@@ -3,8 +3,8 @@
#sessionInfo()
devtools::source_url("https://raw.githubusercontent.com/holgerbrandl/datautils/v1.12/R/core_commons.R")
devtools::source_url("https://raw.githubusercontent.com/holgerbrandl/datautils/v1.12/R/ggplot_commons.R")
devtools::source_url("https://raw.githubusercontent.com/holgerbrandl/datautils/v1.14/R/core_commons.R")
devtools::source_url("https://raw.githubusercontent.com/holgerbrandl/datautils/v1.14/R/ggplot_commons.R")
require.auto(lubridate)
......
......@@ -220,6 +220,17 @@ retouch(){
}
export -f retouch
keepDirAlive(){
targetDir=$1
while true; do
echo "touching $targetDir"; sleep 10000
retouch $1
done
}
#usage keepDirAlive /tmp/local_r_packages &; disown
## kill processes by partial name
## http://stackoverflow.com/questions/8987037/how-to-kill-all-processes-with-a-given-partial-name
# old output redirection scheme
#mysub(){
......
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