## ---- echo=FALSE, results="hide", message=FALSE---------------------------- require(knitr) opts_chunk$set(error=FALSE, message=FALSE, warning=FALSE) ## ----style, echo=FALSE, results='asis'------------------------------------- BiocStyle::markdown() ## ----loadlibs, message=FALSE, warning=FALSE-------------------------------- library(SummarizedExperiment) library(bodymapRat) ## ----loaddata-------------------------------------------------------------- bm_rat <- bodymapRat() # Get the expression data counts = assay(bm_rat) dim(counts) counts[1:5, 1:5] # Get the meta data along columns head(colData(bm_rat)) ## ----sessionInfo----------------------------------------------------------- sessionInfo()