if (isRCloud()) { # disabled on local configs
# so as not to affect package building process
# if executed on a local PC, make sure tools
# are available to the pipeline.
expfolder = tempdir();
# run the pipeline
#
aehts = ArrayExpressHTS("E-GEOD-16190", dir = expfolder);
# load the expression set object
loadednames = load(paste(expfolder,
"/E-GEOD-16190/eset_notstd_rpkm.RData", sep=""));
loadednames;
get('library')(Biobase);
# print out the expression values
#
head(assayData(eset)$exprs);
# print out the experiment meta data
experimentData(eset);
pData(eset);
}
Run the code above in your browser using DataLab