R GG平面图和单个图之间的图差异

我认为分面图和单个图之间存在差异

请注意这些图中的鼠标编号9214：

# Make the faceted graph
fig1 = ggplot(raw, aes(raw$Bregma.)) + geom_density() + ggtitle("Fig. 1. Bregma Representation, by mouse (red = post-ex, green = post-rev)") + 
  geom_density(data = raw_excluded, aes(raw_excluded$Bregma.), color = "red") +
  geom_density(data = raw_revised, aes(raw_revised$Bregma.), color = "green")+ facet_wrap(~Mouse.ID.) 

图一

当我为该数据运行单独的ggplot时，它看起来是这样的，这与刻面图像中的情况不同：

temp_indiv_plot = function(x) {
  temp_mouse = x
  temp_mouse_original = filter(raw, raw$Mouse.ID == temp_mouse)
  temp_mouse_revised = filter(raw_revised, raw_revised$Mouse.ID. == temp_mouse)

  ggplot(temp_mouse_original, aes(x = temp_mouse_original$Bregma.)) + geom_density() + 
    geom_density(data = temp_mouse_revised, aes(temp_mouse_revised$Bregma.), color = "green") + 
    ggtitle(temp_mouse)
}

temp_indiv_plot("8350")
temp_indiv_plot("9214")

但我绘制了另一个鼠标（8350）以查看它是否一致，但它看起来与刻面图相同（在我有足够的声誉之前，不能添加超过3个链接，你现在必须相信我的话）

---

那么为什么鼠标9214不同呢

任何人都几乎不可能帮助您，除非他们能够自己运行代码并生成图形。作为旁注，您不应该在

aes（）

中使用

$

选择变量。拥有

数据

参数的全部目的是

aes（x=variable）

在

数据

内部查找

变量。当你做像aes这样的事情时（不包括$Bregma）。

可能会发生意想不到的事情。@joran的评论适用于

dplyr

函数，如

filter

。这些应该是

filter（raw，Mouse.ID==…）

这很可能是因为在

aes

中使用了美元符号，请查看美元符号是否有效！谢谢@jorany你说得对。感谢@AOSmith提供的资源，除非他们能够自己运行代码并生成图形，否则任何人都几乎不可能帮助您。作为旁注，您不应该在

aes（）

中使用

$

选择变量。拥有

数据

参数的全部目的是

aes（x=variable）

在

数据

内部查找

变量。当你做像aes这样的事情时（不包括$Bregma）。

可能会发生意想不到的事情。@joran的评论适用于

dplyr

函数，如

filter

。这些应该是

filter（raw，Mouse.ID==…）

这很可能是因为在

aes

中使用了美元符号，请查看美元符号是否有效！谢谢@jorany你说得对。感谢@aosmith提供的资源