ggplot：将线型映射到一个特定级别的因子和强制实线？

Question

我正在尝试绘制具有不同线型的多条线（对于打印友好的绘图，其中颜色不是最好的想法）。有一行引用了我们的“主要”类别，所以我想用实线保持它以便于可视化，如何自动将因子映射到线型并强制特定因子级别的特定线型？

以下是一个例子：

library(ggplot2)
df <- data.frame(time=c(1:10,1:10),
                 X=c(cumsum(rnorm(10)),cumsum(rnorm(10))),
                 categ=c(rep("b",10),rep("a",10)))
df %>%
  ggplot(aes(x=time,y=X)) +
  geom_line(aes(linetype=categ))

如何仍然保持因子变量categ映射的线型，但强制（例如）级别b具有实线型？