R ggplot2箱线图中子集上的回归线

我想在ggplot中绘制两个箱线图子集上的回归线。然而，这似乎是不可能的

这是你的电话号码

代码如下：

ggplot(VMT,aes(x=size , y=vmt, group=specimen,colour=sex,fill=sex)) +
geom_boxplot()+
scale_colour_brewer(palette="Set1")+
#geom_point()+
ylab("VTM (°C)")+
xlab("size")+
geom_smooth(data=subset(VMT,sex==F),
          aes(mean(size),mean(vmt),      group=specimen,color=sex,method=lm,se=FALSE))

---

这是你想要的吗？看看这个问题，你似乎想取每个样本的

size

和

vmt

的平均值，并使用这些值进行线性回归。这是使用

dplyr

包完成的

library(ggplot2)
library(dplyr)
## df is same as VMT
df <- read.csv("uro7.csv")[,1:7]
df2 <- filter(df, sex == "F") %>%
    group_by(specimen) %>%
    select(-one_of(c("date", "time", "sex", "turn"))) %>%
    summarize_all(mean)

另外，关于原始代码的一些注释：

---

你应该有

sex==“F”

和

method=lm，se=FALSE

不应该包含在

aes

中（这两个都已在我的代码中修复）。

这是你想要的吗？看看这个问题，你似乎想取每个样本的

size

和

vmt

的平均值，并使用这些值进行线性回归。这是使用

dplyr

包完成的

library(ggplot2)
library(dplyr)
## df is same as VMT
df <- read.csv("uro7.csv")[,1:7]
df2 <- filter(df, sex == "F") %>%
    group_by(specimen) %>%
    select(-one_of(c("date", "time", "sex", "turn"))) %>%
    summarize_all(mean)

另外，关于原始代码的一些注释：

您应该有

sex==“F”

和

method=lm，se=FALSE

不应包含在

aes

中（这两种情况在我的代码中都已修复）