我使用以下代碼創建箱線圖:
plot <- ggplot(WL, aes(y = wavelength, x = factor(category, level = c("A", "B"))))
theme_bw()
geom_boxplot(outlier.colour = "gray30", outlier.shape = 8, outlier.size = 2, lwd=1, fill = c("#C6DBEF", "#FEE391"))
ylab(expression(lambda[(km)]))
theme(plot.margin = unit(c(2,2,2,2), "cm"),
axis.title.x = element_blank(),
axis.title.y=element_text(size=20),
plot.title = element_text(size = 22, vjust = 2))
如何添加圖例?我想把它放在情節中(右上角)。它應該顯示兩種顏色和描述。
我正在嘗試使用對我不起作用的 legends()。

uj5u.com熱心網友回復:
問題在于您指定的位置fill- 以下代碼將為您提供一個圖例,更改position最后一行中的 將允許您在所需的位置更改它:
# sample data
WL <- data.frame(wavelength = rnorm(100, 0,1),
category = sample(LETTERS[1:2], 100, replace = TRUE))
# plot
ggplot(WL, aes(y = wavelength, x = factor(category, level = c("A", "B")), fill = category))
theme_bw()
geom_boxplot(outlier.colour = "gray30", outlier.shape = 8, outlier.size = 2, lwd = 1)
ylab(expression(lambda[(km)]))
theme(plot.margin = unit(c(2,2,2,2), "cm"),
axis.title.x = element_blank(),
axis.title.y=element_text(size=20),
plot.title = element_text(size = 22, vjust = 2))
scale_fill_manual(values = c("#C6DBEF", "#FEE391"))
theme(legend.position = "bottom")

轉載請註明出處,本文鏈接:https://www.uj5u.com/gongcheng/406996.html
標籤:
上一篇:如何在ggplot中添加圖例
下一篇:基于單個觀測值的多個點
