如何放大面板以包含长传说标签

我当前的代码在这里

library(ggplot2) 
library(RColorBrewer) 
pal <- c(brewer.pal(8,"Dark2"),brewer.pal(12,"Paired")); 
dat<-read.table("http://dpaste.com/1051194/plain/",header=TRUE) 
dat.sub <- data.frame(dat$Function,dat$Freq) 
ggplot(dat.sub,aes(dat.Freq,color=dat.Function),shape=dat.Function)+ stat_density(geom="path",position="identity",size=0.5)

产生类似下图： enter image description here

注意图例文本的长度引起的主要情节被挤压。处理这个问题的最好方法是什么，这样数字显得正常，图例也显示了完整性？

来源

2013-04-08 neversaint

更宽的设备 – James 2013-04-08 14:30:12

你如何做到这一点的情节？ – neversaint 2013-04-08 14:31:17

如果以交互方式使用窗口，则可以展开该窗口，或者使用'ggsave'的'width'参数设置设备的大小。 – James 2013-04-08 14:33:12

一种可能性是将图例置于图下，然后将标签排列在两列中。

ggplot(dat.sub,aes(dat.Freq,color=dat.Function),shape=dat.Function)+ 
    stat_density(geom="path",position="identity",size=0.5)+ 
    theme(legend.position="bottom",legend.direction="vertical")+ 
    guides(color=guide_legend(ncol=2))

enter image description here

来源

2013-04-08 14:37:59

如何放大面板以包含长传说标签

回答

相关问题