计算两个日期之间的子集平均值

Question

我将根据以下数据计算两个日期之间的价值均值（市场收盘价格，表示为“收盘价”）：

http://r-exercises.com/wp-content/uploads/2016/07/data.csv

此任务的答案结构如下：

mean(subset(d, as.Date(d$Date) >= as.Date(start) & as.Date(d$Date) <= as.Date(end))$Close)

但是，我不明白这一部分：

mean(...)$Close

这是否意味着，该均值仅在数据框的“关闭”类别上计算？我查看了“均值”函数的文档，但我没有遇到过这样的语法。

我非常感谢您的解释

Answer 1

它不是mean的语法，它是嵌套在函数内部的一系列命令。写这篇文章的程序员可能会将命令分成不同的部分以便更好地理解

#logical index
dateindex <- as.Date(d$Date) >= as.Date(d$start) & as.Date(d$Date) <= as.Date(d$end)

#subset data by index
dsubset <- subset(d, dateindex)

#find mean of 'Close' column in subsetted data
mean(dsubset$Close)