ggplot legendy tnie

Question

To musiało mnie zirytować w przeszłości, więc przepraszam, jeśli to jest duplikat, a ja go usunę. Ukośniki w legendach podczas używania geom_bar mogą być denerwujące. np .:

x <- c("a","b") 
y <- c(1,2) 
df <- as.data.frame(cbind(x,y)) 
a <- ggplot(df,aes(x=x,y=y,fill=x)) 
a + geom_bar(colour="black") + scale_fill_manual(values=c("white", "black")) 

Kiedy używać kolorowych pasków Używam tego obejść, kreślenia prętów bez kolorów pierwszy przykład

a + geom_bar() + geom_bar(colour="black",show_guide=FALSE) + 
scale_fill_manual(values=c("white", "black")) 

Jednak gdy wypełnienie jest białe pozostawia niezadowalające puste białe pudełko w legendzie bez obramowania. na przykład

Mam stałe w przeszłości ręcznie przy użyciu programów graficznych, ale teraz myślę, że musi to być użyteczne dla ludzi na tyle, aby zadać pytanie tutaj. Czy możemy wykonać legalizację tylko z czarnym konturem, ale bez ukośnika?

Answer 1

tym

a + geom_bar() + geom_bar(colour="black",show_guide=FALSE) + 
scale_fill_manual(values=c("white", "black")) + 
opts(legend.key = theme_rect(fill = 'black')) 

dał mi to, dzięki this site.

Alos, otrzymujesz taki sam wynik, używając colour zamiast fill (można argumentować, że jeden jest lepszy niż).

a + geom_bar() + geom_bar(colour="black",show_guide=FALSE) + 
scale_fill_manual(values=c("white", "black")) + 
opts(legend.key = theme_rect(colour = 'black')) 

Ważna uwaga: W nowoczesnych wersjach ggplot2 opts została wycofana i zastąpiona theme i theme_rect został zastąpiony przez element_rect.

Answer 2

Nie, to właśnie nadaje temu zarys. Jeśli używasz szarego zamiast białego (z twoją sztuczką), to jest bardziej rozpoznawalne. Możesz również dodać kolor tła do legendy, aby był bardziej rozpoznawalny i utrzymywał biały kolor. Na dole tej strony, aby uzyskać więcej szczegółów:

http://wiki.stdout.org/rcookbook/Graphs/Legends%20(ggplot2)/

Szkoda, że ​​nie były mniej hackish sposób to zrobić.