R中图像图的标签

Question

我在R中使用image.plot。这是我的简单代码：

x=1:30
y=1:30
z=matrix(rnorm(900),30,30)
library(fields)
image.plot(x,y,z,col=ifelse(z<0,"red","blue"))

这给了我以下情节。如何更改右侧尺寸的标签，只有两个彩色水平条：

红色条，文字标签为“否定”和
蓝色栏，文字标签为“正面”

Answer 1

在image.plot中创建library(fields)的原因是为了便于添加图例。如果您不需要图例，也可以在基础R中使用image。在下面的代码中，我首先使用mar调整边距，然后我允许在外部写入情节par(xpd=TRUE)。这是使用inset调用中的legend完成的。

par(mar=c(4,4,4,6))
par(xpd=TRUE)
image(x,y,z,col=ifelse(z<0,"red","blue"))
legend("right", inset=c(-0.2,0), legend=c("Negative","Positive"), pch=15, col=c("red","blue"),bty="n")