R 在ggplot中添加观测值的几何图形

使用

ResourceSelection

包中的

goes

数据集，我可以使用

glm

查看

ELEVATION

和二进制响应（

STATUS

）之间的关系

library(ResourceSelection)
library(ggplot2)
mod <- glm(STATUS ~ ELEVATION, family=binomial, data = goats) 
summary(mod)

现在，使用生成的

ggplot

如何在图的底部添加一块地毯，以显示

山羊

数据集在

状态==1

时观察到的

高程

。e、 g.我想要一块地毯，上面显示

山羊$ELEVATION[山羊$STATUS==1]

我尝试添加

geom_rug（）

，但不确定如何包含

goes

数据帧中的值，而不是

ggplot

代码中使用的

df

。换句话说，我如何将原始数据中的观察值（如上所示的子集）与

df

数据框中的新预测数据结合起来

---

提前谢谢

geom_rug

有一个数据参数（所有geom都有），所以你应该只给它你想要绘制的数据

ggplot(df, aes(x=ELEVATION, y = Preds)) + geom_point() +
    geom_rug(data = subset(goats, STATUS == 1),
             aes(x = ELEVATION), inherit.aes = F)

---

在本例中，您映射

y=Preds

，这是

goes

数据中不存在的列，因此我们需要使用goes数据为地毯层设置

inherit.aes=F

，以防止ggplot查找不存在的列。

geom\u rug

有一个数据参数（所有geom都有），所以你应该给它你想要绘制的数据

ggplot(df, aes(x=ELEVATION, y = Preds)) + geom_point() +
    geom_rug(data = subset(goats, STATUS == 1),
             aes(x = ELEVATION), inherit.aes = F)

---

在本例中，您映射了

y=Preds

，这是

goes

数据中不存在的列，因此我们需要使用goes数据为地毯层设置

inherit.aes=F

，以防止ggplot查找不存在的列。

您尝试了什么？一个好的开始是

+geom_rug（）

。当然，这将增加所有要点。您可以将数据子集，只绘制一些点。@Gregor我在OPS中添加了澄清和更多细节。您尝试了什么？一个好的开始是

+geom_rug（）

。当然，这将增加所有要点。您可以将数据子集，只绘制部分点。@Gregor我已在OPS中添加了说明和更多细节，感谢您提供有关

inherit.aes=F

的更多信息。非常有用。感谢您提供有关

inherit.aes=F

的更多信息。非常有用。