Nothing
## ----eval=TRUE, echo=TRUE-----------------------------------------------------
if (.Platform$OS.type == 'unix')
{ options('CHRONOS_CACHE'=file.path(path.expand("~"), '.CHRONOS') ) }
if (.Platform$OS.type == 'windows')
{ options('CHRONOS_CACHE'=file.path(gsub("\\\\", "/",
Sys.getenv("USERPROFILE")), "AppData/.CHRONOS")) }
## ----eval=TRUE, echo=TRUE-----------------------------------------------------
library('CHRONOS')
load(system.file('extdata', 'Examples//data.RData', package='CHRONOS'))
head(mRNAexpr)
## ----eval=TRUE, echo=TRUE, message=FALSE--------------------------------------
out <- CHRONOSrun( mRNAexp=mRNAexpr,
mRNAlabel='entrezgene',
miRNAexp=miRNAexpr,
pathType=c('04915', '04917', '04930', '05031'),
org='hsa',
subType='All',
thresholds=c('subScore'=0.4, 'mirScore'=0.4),
miRNAinteractions=miRNAinteractions,
export='.txt')
Any scripts or data that you put into this service are public.
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.