r - 更改 image.plot 中的图例刻度

Question

使用这段代码

library(fields)
rot_mat = matrix(round(runif(25)*3+1),5,5)
image.plot(rot_mat,xaxt= "n", yaxt= "n", frame.plot=F,
             col = c('green', 'blue', 'red', 'yellow'))

我明白了

现在我想将图例右侧的数字 1、2、3、4 转换为字符串，例如“a”、“b”、“c”、“d”。我希望数字紧挨着颜色，以便标签清楚地与特定颜色相关联。

我最接近的是:

image.plot(rot_mat,xaxt= "n", yaxt= "n", frame.plot=F,
           col = c('green', 'blue', 'red', 'yellow'),
           lab.breaks=c('a','b','c','d', ""),
           breaks = c(1,2,3,4,5))

这给了我情节

距离很近，但标签太靠下了。如果您认为其他方法更好，我们非常欢迎您提出除 image.plot 之外的其他方法，但我需要一些可以与 par(mfrow) 一起使用的方法，以便我可以制作子图并且它需要快速处理大 (500* 500) 矩阵。我有 1-4 数字的原因是该矩阵来自两个邻接矩阵的比较，而 1-4 是对应于真阳性、假阳性、真阴性和假阴性“连接”的数字。

Answer 1

image.plot(rot_mat,xaxt= "n", yaxt= "n", frame.plot=F,
           col = c('green', 'blue', 'red', 'yellow'), 
           axis.args = list(at = 1:4, labels=c('a','b','c','d')))