## ----style, echo=FALSE, results="asis", message=FALSE------------------------- knitr::opts_chunk$ set（tidy = false，警告= false，message = false）## ------------------------------------------------------------------------------------------------------------------------------------------------------------------- cranpkg < - function（pkg）{cran < - “ https：//cran.r-project.org/package” fmt < - “ [％s]（％s =％s）“ sprintf（fmt，pkg，cran，pkg）} biocpkg < - function（pkg）{sprintf（“ [％s]（//www.andersvercelli.com.org/packages/packages/%s/%s）pkg，pkg）} library（org.hs.eg.db）库（剂量）库（reactomepa）