## Rprofile for OpenCPU cloud server.
## Example of Rprofile
#
# options(width=65, digits=5)
# options(show.signif.stars=FALSE)

library(phantasus)

cacheDir <- getPhantasusConf("cache_root")
preloadedDir <- getPhantasusConf("preloaded_dir")
cacheDir <- normalizePath(cacheDir)
if (!is.null(preloadedDir)){
    preloadedDir <- normalizePath(preloadedDir)
}
options(phantasusCacheDir = cacheDir,
            phantasusPreloadedDir = preloadedDir)

rnaseq_counts <- getPhantasusConf("cache_folders")$rnaseq_counts
use_hsds <- phantasus:::isHSDS(rnaseq_counts)
if (!is.null(use_hsds) && use_hsds){
    options(PhantasusUseHSDS = TRUE)
}
phantasus:::selfCheck()
phantasus:::annotationDBMeta(getPhantasusConf("cache_folders")$annot_db)
phantasus:::FGSEAmeta(getPhantasusConf("cache_folders")$fgsea_pathways)


