如何使用 Sjplot 更改 facet_grid 和点估计的形状?

洛洛

我需要使用 plot_model 自定义我的绘图,这是一个用于绘制广义线性混合效应模型的函数。我有一个显示系数的森林图和一个显示概率的线图。

在下面的森林图中,我有两个级别(年轻人、老年人)的年龄因子。我想要实现的是改变两组的点估计形状,例如,为年轻人显示一个圆圈,为老年人显示一个菱形。在下图中,我想为“Age:New”、“Age:Lure”、“Age:Old”设置不同的形状。但是,我没有找到任何额外的论据允许我这样做。任何想法?

森林图

在此处输入图片说明

同样,在下面的线图中,我想将 facet_grid 标签从 0 和 1 更改为“年轻人”和“老年人”。这可以通过 ggplot2 实现,但是当我使用 sjplot 时,我想知道是否有办法在其中实现它。

线图

在此处输入图片说明

我已经绘制了我的模型,但是我想获得一些额外的灵活性。

这是森林图的代码:

plot_model(model1_original_conf, type = "est", transform = NULL, terms = c("ZcConfusabilitySimWeightedSim",
                                                                           "Age1:ZcConfusabilitySimWeightedSim",
                                                                           "Conditionlure:ZcConfusabilitySimWeightedSim",
                                                                           "Conditionold:ZcConfusabilitySimWeightedSim",
                                                                           "Age1:Conditionlure:ZcConfusabilitySimWeightedSim",
                                                                           "Age1:Conditionold:ZcConfusabilitySimWeightedSim"),

           colors = c("seagreen3", "deepskyblue2", "orchid"), 
           show.values = TRUE,
           value.offset = .4,
           value.size = 6,
           dot.size = 6,
           line.size = 2.5,
           vline.color = "red",
           width = 0.5,
           axis.labels = c("Age:New", "New", "Age:Lure", "Lure", "Age:Old", "Old"),
           title = "Semantic Confusability",
           order.terms = c(4,6,3,5,1,2),
           group.terms = c(1,1,2,3,2,3))

这是线图的代码:

plot_model(model1_original_conf, type = "pred",
           terms = c("ZcConfusabilitySimWeightedSim", "Condition", "Age"),
           colors = c("seagreen3", "deepskyblue2", "orchid"),
           title = "Raw probabilities",
           axis.title = c("Semantic Confusability", "p (judge item is OLD)"),
           line.size = 2.0)

我希望找到 1) 森林图中点估计的不同形状(例如,圆形和三角形或菱形)和 2)线图(“年轻人”和“老年人”)的 0 和 1 的适当标签。

丹尼尔

但是,我没有找到任何额外的论据允许我这样做。任何想法?

您需要ggplot2::aes()更新映射,然后您可以添加scale_shape_manual()到从plot_model().

例子:

library(sjPlot)
library(ggplot2)
m <- lm(Sepal.Length ~ Petal.Width + Petal.Length + Species, data = iris)

plot_model(m, group.terms = c(1, 1, 2, 2)) + 
  aes(shape = group) +
  scale_shape_manual(values = c(1, 4))

reprex 包(v0.2.1)于 2019 年 5 月 6 日创建

我想将 facet_grid 标签从 0 和 1 更改为“年轻人”和“老年人”。

当您有一个具有所需因子水平的因子时,这应该有效:

library(sjPlot)
library(ggplot2)
library(sjmisc)

set.seed(123)
iris$binary <- sample(c(0, 1), nrow(iris), replace = T)
iris$Sepal.Length_d <- sjmisc::dicho(iris$Sepal.Length)
m2 <- glm(Sepal.Length_d ~ Petal.Width + Petal.Length * Species * binary, data = iris, family = binomial())
plot_model(m2, type = "pred", terms = c("Petal.Length", "Species", "binary"), ci.lvl = NA)

iris$binary <- sjmisc::rec(iris$binary, rec = "0=young adults;1=older adults", as.num = FALSE)
m3 <- glm(Sepal.Length_d ~ Petal.Width + Petal.Length * Species * binary, data = iris, family = binomial())
plot_model(m3, type = "pred", terms = c("Petal.Length", "Species", "binary"), ci.lvl = NA)

reprex 包(v0.2.1)于 2019 年 5 月 6 日创建

本文收集自互联网,转载请注明来源。

如有侵权,请联系[email protected] 删除。

编辑于
0

我来说两句

0条评论
登录后参与评论

相关文章

来自分类Dev

使用ggplot()和facet_grid()绘制几个图

来自分类Dev

使用facet_grid时如何更改刻面边框的颜色

来自分类Dev

R:如何更改facet_grid中每一行的列数

来自分类Dev

使用ggplot2中的facet_grid更改中断次数

来自分类Dev

更改(全部)facet_grid带状文本

来自分类Dev

使用 Sjplot 绘图时,数据点的形状可以根据组更改吗?

来自分类Dev

如何在R中的facet_grid图上注释R-sq和p值?

来自分类Dev

如何在ggplot2 :: facet_grid中格式化网格标题和条目

来自分类Dev

将geom_boxplot与facet_grid和free_y一起使用

来自分类Dev

ggplot2:如何获取facet_grid()的labeller = label_both和facet_wrap()的ncol选项的合并功能?

来自分类Dev

如何在时间序列数据上创建 facet_grid?

来自分类Dev

使用facet_grid为我的因素添加“标题”

来自分类Dev

在ggplot中使用facet_grid进行绘图

来自分类Dev

是否可以在facet_grid()中使用geom_table()?

来自分类Dev

使用facet_grid的多个直方图颜色计数

来自分类Dev

不同的y轴标签facet_grid和大小

来自分类Dev

将参数传递给ggplot和facet_grid

来自分类Dev

添加facet_grid面板均值作为文字和线条

来自分类Dev

控制facet_grid、ggplot中的间距和标签

来自分类Dev

因子和重新排序 facet_grid 的问题

来自分类Dev

结合 facet_grid (ggplot2) 和 denscomp (fitdistrplus)

来自分类Dev

使用facet_grid的“顶部标签”,或者使用facet_wrap的“空间选项”

来自分类Dev

删除 2-way facet_grid 中未使用的 facet 组合

来自分类Dev

ggplot2中的facet_wrap()和facet_grid()有什么区别?

来自分类Dev

对于相同高度的瓷砖,geom_tile和facet_grid / facet_wrap

来自分类Dev

对于相同高度的瓷砖,geom_tile和facet_grid / facet_wrap

来自分类Dev

使用预测程序包从预测中获取预测点估计值和时间间隔

来自分类Dev

使用置信区间和点估计计算比例的方差

来自分类Dev

ggplot2:更改facet_grid图中的strip.text位置

Related 相关文章

  1. 1

    使用ggplot()和facet_grid()绘制几个图

  2. 2

    使用facet_grid时如何更改刻面边框的颜色

  3. 3

    R:如何更改facet_grid中每一行的列数

  4. 4

    使用ggplot2中的facet_grid更改中断次数

  5. 5

    更改(全部)facet_grid带状文本

  6. 6

    使用 Sjplot 绘图时,数据点的形状可以根据组更改吗?

  7. 7

    如何在R中的facet_grid图上注释R-sq和p值?

  8. 8

    如何在ggplot2 :: facet_grid中格式化网格标题和条目

  9. 9

    将geom_boxplot与facet_grid和free_y一起使用

  10. 10

    ggplot2:如何获取facet_grid()的labeller = label_both和facet_wrap()的ncol选项的合并功能?

  11. 11

    如何在时间序列数据上创建 facet_grid?

  12. 12

    使用facet_grid为我的因素添加“标题”

  13. 13

    在ggplot中使用facet_grid进行绘图

  14. 14

    是否可以在facet_grid()中使用geom_table()?

  15. 15

    使用facet_grid的多个直方图颜色计数

  16. 16

    不同的y轴标签facet_grid和大小

  17. 17

    将参数传递给ggplot和facet_grid

  18. 18

    添加facet_grid面板均值作为文字和线条

  19. 19

    控制facet_grid、ggplot中的间距和标签

  20. 20

    因子和重新排序 facet_grid 的问题

  21. 21

    结合 facet_grid (ggplot2) 和 denscomp (fitdistrplus)

  22. 22

    使用facet_grid的“顶部标签”,或者使用facet_wrap的“空间选项”

  23. 23

    删除 2-way facet_grid 中未使用的 facet 组合

  24. 24

    ggplot2中的facet_wrap()和facet_grid()有什么区别?

  25. 25

    对于相同高度的瓷砖,geom_tile和facet_grid / facet_wrap

  26. 26

    对于相同高度的瓷砖,geom_tile和facet_grid / facet_wrap

  27. 27

    使用预测程序包从预测中获取预测点估计值和时间间隔

  28. 28

    使用置信区间和点估计计算比例的方差

  29. 29

    ggplot2:更改facet_grid图中的strip.text位置

热门标签

归档