R ggplot geom_line：如何增加图例键的厚度

Question

在R中使用ggplot，我从数据框中绘制了geom_line()图。

df <- data.frame(g=gl(4,5), x=rep(1:5, 4), y=runif(4*5))

p <- ggplot(df, aes(x, y, linetype=g, shape=g, colour=g)) +
  geom_line()

现在，我想增加图例键的厚度。

这会增加图例键之间的空间（不是我想要的）：

p + theme(legend.key.size=unit(1.5, 'in'))

这似乎做同样的事情（仍然不是我想要的）：

p + theme(legend.key.height=unit(1.5, 'in'))

这会增加图例键的宽度（不是我想要的）：

p + theme(legend.key.width=unit(1.5, 'in'))

我基本上需要与legend.key.width相同，但要控制键的厚度。

你能帮忙吗？