Легенда с разными размерами символов в базе R - PullRequest
5 голосов
/ 10 января 2012

В моей таблице я кодирую некоторую информацию в диаметре нанесенных кругов.У меня вопрос: как проще всего документировать эту информацию в легенде?

Вот что я пробовал до сих пор:

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) изменился, но также и текст легенды.Как я могу переопределить это, чтобы только символы легенды были разных размеров?

1 Ответ

12 голосов
/ 10 января 2012

Вы ищете аргумент pt.cex для legend().

cex управляет размером текста в легенде (а также предоставляет значения по умолчанию для pt.cex и title.cex, которые будут использоваться, если они не указаны иначе).

...