## ---- 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()