shaman_conda.R 754 Bytes
Newer Older
1
#!/usr/bin/env Rscript --vanilla
Amine  GHOZLANE's avatar
Amine GHOZLANE committed
2
prefix=Sys.getenv(x = "CONDA_PREFIX")
Amine  GHOZLANE's avatar
Amine GHOZLANE committed
3
prefix=paste(prefix, "bin", sep=.Platform$file.sep)
4
system(paste("python ", prefix, "shaman_bioblend/shaman_bioblend.py -w ", prefix,"shamanapp/www/masque/ -s -d", sep=.Platform$file.sep))
Amine  GHOZLANE's avatar
Amine GHOZLANE committed
5
6
workdir = getwd()
kronarshy=tempfile("kronarshy",fileext=".R", tmpdir =workdir )
7
8
write(paste("library(\"shiny\");runApp(appDir=\"", prefix,"KronaRShy\", port=5438)", sep=.Platform$file.sep),kronarshy)
system(paste("Rscript", kronarshy), wait=FALSE)
Amine  GHOZLANE's avatar
Amine GHOZLANE committed
9
shamanapp=tempfile("shaman", fileext=".R", tmpdir =workdir)
10
11
write(paste("library(\"shiny\");runApp(appDir=\"", prefix,"shamanapp\", port=80, host=\"0.0.0.0\")", sep=.Platform$file.sep), shamanapp)
system(paste("Rscript", shamanapp), wait=FALSE)