如何轻松可视化矩阵？

Question

在进行矩阵运算时,我希望能够看到我的计算结果是什么,至少可以大致了解进入和退出运算的矩阵的性质.

如何绘制实数矩阵,以便x轴表示列,y表示行,点的颜色或大小表示单元格值？

最后,我想显示多个图,例如方程的右侧和左侧.

这是一些示例代码:

a <- matrix(rnorm(100), ncol = 10)
b <- diag(1,10)
c <- a*b

par(mfrow = c(1,3))
plot.matrix.fn <- function(m) {
   #enter answer to this question here
}
lapply(list(a,b,c), plot.matrix.fn)

更新:自发布此问题以来,我发现这里有一些很好的例子:R中存在哪些技术可视化"距离矩阵"？

Answer 1

您可以尝试类似的东西(根据您的特定需求调整参数)

   image(t(m[nrow(m):1,] ), axes=FALSE, zlim=c(-4,4), col=rainbow(21))

产生类似的东西

Answer 2

请参阅?image单个绘图(请注意,第1行将位于底部)以及?rasterImage向现有绘图添加1个或多个表示.您可能希望首先对矩阵进行一些缩放或其他转换.