## ----- echo = false，结果=“ hide”，messages = false -------------------------------------------------------------------------------------------------------------------------require（knitr）opts_chunk $ set（错误= false，message = false，parning = false）## ----样式，echo = false，结果='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列头（coldata（bm_rat））## ---- sessioninfo ----------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------- sessionInfo（）