r - 如何重复 ggplot 图例中的符号以获得更好的符号 View ？

Question

我刚刚开始杜波依斯挑战，作为 #tidytuesday 的一部分，目前正在挑战挑战 1:乔治亚州白人和有色人种人口的相对增长

原始图表具有带有 4 个破折号的“白色”符号 enter image description here ，但是当我复制该图时，图例只有 1 和第二个破折号的一点。

如何重复图例中的符号以获得 4 个破折号？我不需要增加大小，只需重复

Answer 1

尝试在主题中设置legend.key.width:

library(ggplot2)

ggplot(df1, aes(x, y, linetype = f)) +
  geom_line() +
  scale_linetype_manual(values = c("solid", "dashed")) +
  theme(legend.key.width = unit(1.5, "strwidth", "- - - - "))

测试数据

set.seed(2021)
df1 <- data.frame(
 x = c(1:10, 1:10),
 y = c(cumsum(rnorm(10)), cumsum(rnorm(10))),
 f = rep(c("A", "B"), each = 10)
)