如何绘制以下矩阵

> a<-matrix(c(-1,0,1,0),nrow=2,ncol=2,byrow=TRUE) 
> a 
     [,1] [,2] 
[1,]   -1    0 
[2,]    1    0 

原样，即在 2D 中，表示某些调色板中的值，如灰度？

应该得到这样的东西:

与

image(a,col=grey(seq(0, 1, length = 256))) 

我得到这个:

即矩阵被重新定向和缩放。

请您参考如下方法:

只需转置 (t) 您的矩阵

image(t(a),col=grey(seq(0, 1, length = 256))) 

如果您希望标签从 1 而不是 0 开始计数，请执行以下操作: (取自此处:r- how to edit elements on x axis in image.plot)

image(t(a),col=grey(seq(1, 0, length = 256)), axes = F) 
axis(1, at=seq(1,nrow(a))-1, labels=seq(1,nrow(a))) 
axis(2, at=seq(1,ncol(a))-1, labels=seq(1,ncol(a))) 

结果: