Я рисую две полупрозрачные ленты вместе. Используя приведенный ниже код, без части scale_fill_manual
, я получаю в основном то, что хочу, с легендой под названием "red"
и надписями blue
и red
. Добавление части scale_fill_manual
позволяет мне назвать легенду и ее записи, что я хочу, но я теряю прозрачность цветных прямоугольников в легенде.
x=1:10
y1=1:10
y2=2:11
y3=10:1
y4=9:0
dt=data.frame(x,y1,y2,y3,y4)
library(ggplot2)
ggplot(dt)+
geom_ribbon(aes(x=x,ymin=y1,ymax=y2,fill='red'),
alpha=0.4,)+
geom_ribbon(aes(x=x,ymin=y3,ymax=y4,fill='blue'),
alpha=0.5)+
scale_fill_manual(name='legendname',
values=c('red','blue'),
labels=c('one','two'))
вывод sessionInfo()
R version 2.15.2 (2012-10-26)
Platform: x86_64-apple-darwin9.8.0/x86_64 (64-bit)
locale:
[1] en_US.UTF-8/en_US.UTF-8/en_US.UTF-8/C/en_US.UTF-8/en_US.UTF-8
attached base packages:
[1] stats graphics grDevices utils datasets methods base
other attached packages:
[1] scales_0.2.3 ggplot2_0.9.3 plyr_1.8 reshape2_1.2.2
loaded via a namespace (and not attached):
[1] colorspace_1.2-0 dichromat_1.2-4 digest_0.6.0 grid_2.15.2 gtable_0.1.2 labeling_0.1
[7] MASS_7.3-22 munsell_0.4 proto_0.3-10 RColorBrewer_1.0-5 rstudio_0.97.248 stringr_0.6.2
[13] tools_2.15.2
Есть много решений для подобных проблем (Настроить легенду в ggplot, https://stats.stackexchange.com/info/5007/how-can-i-change-the-title-of-a-legend-in-ggplot2, и т.д.), но я не могу найти ничего, что конкретно касается этого.
Заранее спасибо