在R中将矩阵转换为灰度图像

Question

我有以下矢量：

 vec<-as.vector(rnorm(1:924))

并希望将其重塑为33 X 28形式的矩阵。然后将矩阵转换为像图像一样的灰度像素。

在MATLAB中，我知道存在 imagesc 和 imshow 将矩阵转换为图像。 R中有类似的东西吗？

另外，对于灰度强度，是否可以像在MATLAB中那样调整均值和最大值？

Answer 1

您正在寻找?heatmap：

heatmap(matrix(vec,33,28),Rowv=NA,Colv=NA,col=paste("gray",1:99,sep=""))

您可以通过col参数调整最小/最大颜色。查看?image，?heat.colors和朋友。

Answer 2

与斯蒂芬的答案没有太大的不同，但如果你想提供更全面的灰色，你可以做以下事情：

grays = rgb(red = 0:255/255, blue = 0:255/255, green = 0:255/255)
heatmap(matrix(rnorm(100), 10, 10),Rowv=NA,Colv=NA,col=grays, scale = "none")