r - 在ggplot中创建多列图例

Question

我有以下脚本，它假设创建一个带有两列图例的图。

 #!/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)

但它反而创造了这个数字

我怎样才能正确地做到这一点？

Answer 1

您必须将指南分配给正确的美学，并且您使用了填充：

guides(fill=guide_legend(ncol=2))

你应该注意警告geom_bar