【发布时间】:2018-02-28 10:59:09
【问题描述】:
如何使用 r 中的图像函数制作由零和零组成的给定矩阵的黑白热图,其中零用黑色表示,而用白色表示的零?
【问题讨论】:
如何使用 r 中的图像函数制作由零和零组成的给定矩阵的黑白热图,其中零用黑色表示,而用白色表示的零?
【问题讨论】:
制作一个矩阵:
set.seed(42)
mat <- matrix(round(runif(100)), ncol = 10)
mat
#> [,1] [,2] [,3] [,4] [,5] [,6] [,7] [,8] [,9] [,10]
#> [1,] 1 0 1 1 0 0 1 0 1 1
#> [2,] 1 1 0 1 0 0 1 0 0 0
#> [3,] 0 1 1 0 0 0 1 0 0 0
#> [4,] 1 0 1 1 1 1 1 0 1 1
#> [5,] 1 0 0 0 0 0 1 0 1 1
#> [6,] 1 1 1 1 1 1 0 1 1 1
#> [7,] 1 1 0 0 1 1 0 0 0 0
#> [8,] 0 0 1 0 1 0 1 0 0 1
#> [9,] 1 0 0 1 1 0 1 1 0 1
#> [10,] 1 1 1 1 1 1 0 0 0 1
绘制它:
image(t(mat[nrow(mat):1,]), col = c("black", "white"))
t() 和 nrow(mat):1 用于重新排列矩阵,使矩阵的图像与打印的矩阵匹配。
【讨论】: