如何通过以下表达式获得具有置信区间的平均值,不仅使用图形绘图,而且还通过数值数据获得平均值?
m <- melt(x, id="time")
k <- ggplot(m, aes(x=time, y=value)) +
stat_summary(fun.data="mean_cl_boot", geom="smooth")
k
我试图检查k的内容,但我只找到了我的初始数据,而不是最终结果。
只需应用您在stat_summary
中使用的函数:
tapply(m$value, m$time, mean_cl_boot)
函数tapply
用于将函数应用于数据子集。在这里,数据m$value
.子集由 m$time
定义。函数mean_cl_boot
分别应用于数据的所有子集。