gpt4 book ai didi

r - 在 ggplot2 中添加趋势线/箱线图(按组)

转载 作者:行者123 更新时间:2023-12-03 17:44:43 29 4
gpt4 key购买 nike

我有 40 个科目,两组,超过 15 周,有一些测量变量(Y)。

我希望有一个情节,其中:x = 时间,y = T,线条按主题分类,颜色按组分类。

我发现它可以这样做:

TIME <- paste("week",5:20)
ID <- 1:40
GROUP <- sample(c("a","b"),length(ID), replace = T)
group.id <- data.frame(GROUP, ID)
a <- expand.grid(TIME, ID)
colnames(a) <-c("TIME", "ID")
group.id.time <- merge(a, group.id)
Y <- rnorm(dim(group.id.time)[1], mean = ifelse(group.id.time$GROUP =="a",1,3) )
DATA <- cbind(group.id.time, Y)
qplot(data = DATA,
x=TIME, y=Y,
group=ID,
geom = c("line"),colour = GROUP)

但是现在我想在图中添加一些东西来显示两组之间的差异(例如,每个组的趋势线,带有一些 CI 阴影线) - 如何做到?

我记得有一次看到 ggplot2 可以(很容易)用 geom_smooth 做到这一点,但我错过了一些关于如何让它工作的东西。

另外,我想知道是否让线条像每个组的箱线图一样(不同分位数和围栏等都有一条线)。但我想回答第一个问题会帮助我解决第二个问题。

谢谢。

最佳答案

p <- ggplot(data=DATA, aes(x=TIME, y=Y, group=ID)) +
geom_line(aes(colour=GROUP)) +
geom_smooth(aes(group=GROUP))

geom_smooth plot http://img143.imageshack.us/img143/7678/geomsmooth.png

关于r - 在 ggplot2 中添加趋势线/箱线图(按组),我们在Stack Overflow上找到一个类似的问题: https://stackoverflow.com/questions/2760898/

29 4 0
Copyright 2021 - 2024 cfsdn All Rights Reserved 蜀ICP备2022000587号
广告合作:1813099741@qq.com 6ren.com