相关疑难解决方法(0)

我正在使用ggplot绘制比例堆积条形图.我得到的情节是这样的:

这是我正在使用的自编函数:

df <- data.frame(id=letters[1:3],val0=1:3,val1=4:6,val2=7:9, val3=2:4, val4=1:3, val5=4:6, val6=10:12, val7=12:14)

PropBarPlot<-function(df, mytitle=""){
   melteddf<-melt(df, id=names(df)[1], na.rm=T)
   ggplot(melteddf, aes_string(x=names(df)[1], y="value", fill="variable")) + 
     geom_bar(position="fill") + 
     theme(axis.text.x = element_text(angle=90, vjust=1)) + 
     labs(title=mytitle)
}

print(PropBarPlot(df))

在这里val4并val5没有太大的不同.

但由于颜色,其中一些是无法区分的.有人能告诉我如何选择更好的颜色,以便它们可以区分吗？

谢谢.