R ggplot2：函数中的时间平均值

如果我有这样的数据

DF <- data.frame(
  date = seq(Sys.Date()-1000, len=1000, by="1 day")[sample(1000, 500)],
  price = runif(500)
)

---

DF您需要使用
cut（，“months”）
将日期转换为月份，然后使用ggplot
stat\u summary对每个月应用
mean
。下面介绍如何在
qplot
中实现这一点，它是
ggplot
的一个紧凑方便的包装器

qplot(as.Date(cut(date,"months")), 
  price, data=DF, stat="summary", fun.y="mean", xlab="date")



基本绘图也可以这样做：

plot(aggregate(DF$price, list(as.Date(cut(DF$date, "month"))), mean))

非常感谢您提供数据生成器+1.