有什么方法可以扩展图例中的线条？

Question

我们假设我使用ggplot绘制了以下图表:

无论如何都要延长图例中显示的线长度？有时,使用图例无法识别哪条线对应于图中的哪一条线.

Answer 1

这是一个选项legend.key.width:

# sample data frame
df <- data.frame(x = c(rnorm(100, -3), rnorm(100), rnorm(100, 3)), 
                 g = gl(3, 100))
df <- ddply(df, .(g), summarize, x = x, y = ecdf(x)(x))

ggplot(df, aes(x, y, colour = g, linetype = g)) + 
    geom_line() + 
    theme(legend.key.width = unit(10, "line"))