### R代码从vignette源的multiOmicsViz。Rnw“# # #编码:utf - 8 ################################################### ### 代码块1号:例子 ################################################### 库(multiOmicsViz) sourceOmics < -执行(“extdata”、“sourceOmics.txt”,包=“multiOmicsViz”)sourceOmics < - read.table (sourceOmics头= TRUE, 9 =“t \”,stringsAsFactors = FALSE, check.names = FALSE) targetOmics1 < -执行(“extdata”、“targetOmics.txt”,包=“multiOmicsViz”)targetOmics1 < - read.table (targetOmics1头= TRUE, 9 =“t \”,stringsAsFactors = FALSE, check.names = FALSE) targetOmicsList < -列表()targetOmicsList [[1]] < -targetOmics1 outputfile < -粘贴(tempdir() /热图,9 = " ")multiOmicsViz (sourceOmics,“中央社”、“20”,targetOmicsList,“信使rna”,“所有”,0.001,outputfile ) ################################################### ### 代码块2号:例子 ################################################### 库(multiOmicsViz) matrix1 < -执行(“extdata”、“sourceOmics.txt”,包=“multiOmicsViz”)matrix1 < - read.table (matrix1头= TRUE, 9 =“t \”,stringsAsFactors = FALSE, check.names = FALSE) matrix2 < -执行(“extdata”、“targetOmics.txt”,包=“multiOmicsViz”)matrix2 < - read.table (matrix2头= TRUE, 9 =“t \”,stringsAsFactors = FALSE, check.names = FALSE)团体< - calculateCorForTwoMatrices (matrix1 = matrix1 matrix2 = matrix2,罗斯福= 0.01)