# #——knitr,回声= FALSE,结果=“隐藏”- - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -库(knitr) opts_chunk美元集(整洁= FALSE, dev =“png”,无花果。显示=“隐藏”,fig.width = 4, fig.height = 4.5,消息= FALSE) # # - - - - - = 50)codonCovMatrix < - codonCovMatrix [ixExpGenes] #得到密码子的PCA覆盖codonCovMatrixTransp < - t (codonCovMatrix) rownames (codonCovMatrixTransp) < - colnames (codonCovMatrix) colnames (codonCovMatrixTransp) < - rownames (codonCovMatrix) listPCACodonCoverage <——codonPCA (codonCovMatrixTransp, codonCoverage) listPCACodonCoverage [[2]] # #——sessInfo,呼应= TRUE, eval = TRUE - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - sessionInfo ()