Creating multi column legend in ggplot

Question

I have the following script, which suppose to create a plot with two column legend.

 #!/usr/bin/Rscript
library(ggplot2)
library(plyr)
library(reshape2)
library(scales)

file <- "http://dpaste.com/1354089/plain/";
dat <-read.table(file,header=TRUE);
datm <- melt(dat)

# Plot them
ggplot(datm,aes(x = variable,y = value,fill = Term)) +
geom_bar(position = "fill") +
scale_y_continuous(labels = percent_format())+
theme(legend.direction ="vertical",legend.position = "bottom")+

guides(color=guide_legend(ncol=2))+ # this doesn't seem to work

ggsave(file="~/Desktop/test.pdf",width=11,height=11)

But it creates this figure instead enter image description here

How can I do it correctly?

ah bon · Accepted Answer · 2020-11-24 14:07:15Z

188

you must assign the guide to the correct aesthetic and you used fill:

guides(fill=guide_legend(ncol=2))

And you should take care of the warning with geom_bar

edited Nov 24, 2020 at 14:07

ah bon

10.1k22 gold badges82 silver badges187 bronze badges

answered Aug 23, 2013 at 10:36

Ido Tamir

3,1772 gold badges21 silver badges31 bronze badges

Sign up to request clarification or add additional context in comments.

1 Comment

neversaint Over a year ago

+1 for succinct answer. Any suggestion, how to address the warning?

Collectives™ on Stack Overflow

Creating multi column legend in ggplot

1 Answer 1

1 Comment

Your Answer

Linked

Hot Network Questions

Collectives™ on Stack Overflow

1 Answer 1

1 Comment

Your Answer

Sign up or log in

Post as a guest

Linked

Related