r - ggplot2 以评估值作为结果绘图

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分别应用于数据的所有子集。