r - 使用 plot_model() 更改线型和线条颜色

Question

我正在尝试使用 plot_model() 创建预测值图函数来自 sjPlot .我希望我的预测线具有不同的线型和不同的颜色。

该函数包括一个 colors参数和设置 colors至 bw会变linetype ，但设置 colors到灰度。这个问题很相似，但没有收到有用的答案:Colored ribbons and different linetypes in sjPlot plot_model()

例子:

不同 linetypes ，但不是 colors

data(iris)
toy_model <- lm( Sepal.Length ~ Sepal.Width + Species, data=iris)

my_plot <- plot_model(toy_model, type=("pred"),
terms=c("Sepal.Width","Species"),
colors="bw")

不同 colors ，但不是 linetypes

data(iris)
toy_model <- lm( Sepal.Length ~ Sepal.Width + Species, data=iris)

my_plot <- plot_model(toy_model, type=("pred"),
terms=c("Sepal.Width","Species"))

我怎样才能得到两个不同的 colors和不同 linetypes ?换句话说，我想要这样的东西

Answer 1

sjPlot在定制方面似乎相当严格，但有一些方法可以解决。您可以从 ggpredict 获取数据(来自 ggeffects 包)并在 ggplot 中像往常一样自定义绘图.

df <- ggpredict(toy_model, terms = c("Sepal.Width","Species"))
ggplot(df, aes(x, predicted)) + 
    geom_line(aes(linetype=group, color=group)) +
    geom_ribbon(aes(ymin=conf.low, ymax=conf.high, fill=group), alpha=0.15) +
    scale_linetype_manual(values = c("solid", "dashed", "dotted"))