更改图例中的图例勾号.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))

这给了我情节

哪个贴近但标签太远了。如果您认为其他方法更好但我需要一些可以与par（mfrow）一起使用的东西，以便我可以制作子图并且它需要快速大（500 *），我们非常欢迎您提出除image.plot之外的其他方法。 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')))