Question

我怎样才能获得带有置信区间的均值，不仅是图形图，还有下面表达式的数值数据？

m <- melt(x, id="time")
k <- ggplot(m, aes(x=time, y=value)) +
     stat_summary(fun.data="mean_cl_boot", geom="smooth")
k

我试图检查k的内容，但我只找到了我的初始数据，而不是最终结果。

Answer 1

只需应用您在stat_summary中使用的功能：

tapply(m$value, m$time, mean_cl_boot)

函数tapply用于将函数应用于数据子集。这里的数据是m$value。子集由m$time定义。函数mean_cl_boot分别应用于数据的所有子集。