在我的图表中,我编码了圆形直径的一些信息。我的问题是,在图例中记录这些信息的最简单方法是什么?
这是我到现在为止所尝试的:
dat <- rnorm(100)
cex_brks <- quantile(dat, c(0.25,0.5,0.75))
cex_size <- c(1,1.4,1.8, 2.2)
cex <- rep(NA, length(dat))
for (i in 1:3) {
cex[is.na(cex) & dat<=cex_brks[[i]]] <- cex_size[[i]]
}
cex[is.na(cex)] <- cex_size[[4]]
plot(dat, cex=cex, pch=21)
legend(
"bottom",
legend=c("very small", "small", "large", "very large"),
bty="n",
pch=21,
cex=cex_size
)
但是,这样做,不仅符号(pch)的大小发生了变化,而且图例文本也发生了变化。如何覆盖它,以便只有图例符号的大小不同?
答案 0 :(得分:12)
您正在寻找pt.cex
的{{1}}参数。
legend()
控制图例中文字的大小(以及提供cex
和pt.cex
的默认值,以便在需要时使用没有另行规定)。