ggplot2-多于一行时控制线型

Question

请看以下示例：

library(ggplot2)
dsamp <- diamonds[sample(nrow(diamonds), 1000), ]

ggplot(dsamp, aes(x = x)) +
    geom_line(aes(y = y, linetype = "Simple Model")) +
    geom_line(aes(y = z, linetype = "Complex Model"))

产生此图：

好。 我的问题是我希望线型反转。 我希望简单模型的实线和复杂模型的虚线。 默认情况下，字母顺序似乎决定了此处的线型。 我已经使用scale_linetype_manual等尝试了不同的变体，但是尝试了一下，因为我可能无法使简单的线条变得牢固而使虚线复杂的同时又无法在图例中保留“简单”和“复杂”标题。 在有人提出建议之前，我试图避免融化/重塑该数据，以使y变量都在1列中，因为实际数据在图中有更多内容，而且会非常复杂。

编辑：好的，感谢Haboryme的回复。 我发现我困惑的根源。

采取以下情节：

ggplot(dsamp, aes(x = x)) +
    geom_line(aes(y = y, linetype = "Simple Model"), size = 1.5) +
    geom_line(aes(y = z, linetype = "Complex Model"), size = 1.5) +
    scale_linetype_manual(values=c( 5, 1))

图例似乎将线型都显示为实线：

但是，如果我将其更改为线型3：

ggplot(dsamp, aes(x = x)) +
    geom_line(aes(y = y, linetype = "Simple Model"), size = 1.5) +
    geom_line(aes(y = z, linetype = "Complex Model"), size = 1.5) +
    scale_linetype_manual(values = c( 3, 1))

线型图例正确：

好吧，我想这解决了我的问题-我将只需要使用线型3。似乎尺寸为1.5的线型5恰好不适合图例空间？

Answer 1

ggplot(dsamp, aes(x=x)) +
  geom_line(aes(y=y, linetype="Simple Model"),size=1.5) +
  geom_line(aes(y=z, linetype="Complex Model"),size=1.5)+
  scale_linetype_manual(values=c(5,1))

上面的代码将为您提供一个图例，其中两条线在图例中看起来相似。
这是因为linetype linetype=5等效于“ longdash”（2为“虚线”）。 长破折号太长，无法在图例中显示。

如果您想保留带有长破折号的size=1.5 （或更大）并具有适当的图例，则还需要更改图例的大小，例如：

+theme(legend.key.size=unit(2,"cm"))