r - 具有纵横比 1 和轴刻度的图像绘图函数

Question

给定一个方阵 M，我们如何绘制它才能使纵横比为 1 并正确显示轴？

我在找这个:

M <- t(replicate(50,sample(50, replace=TRUE)))
image(1:dim(M)[1], 1:dim(M)[1], M, col= gray((0:32)/32), asp=1)

但是轴重新缩放以适合图像。

Answer 1

要更改轴上的值，您可以使用 axis 函数并在图像中添加 axes=F 或 xaxt="n"函数首先抑制轴和/或刻度标签。

image(1:dim(M)[1], 1:dim(M)[1], M, col= gray((0:32)/32), asp=1)
axis(1,1:50,1:50) # add a new x-axis
axis(2,1:50,1:50, pos=0) # add a y-axis with the coordinate zero.