从嵌套数据框生成认知统计（cognostics）
让我们把平均收盘价、平均成交量以及年度回报率作为认知统计来计算。对应的原始变量 open、close 和 volume 位于数据集 by_symbol 中的嵌套数据框 data 里。
另外，已为您提供便捷函数 annual_return() 可直接使用。
本练习是课程的一部分
使用 R 中的 Trelliscope 可视化大数据
练习说明
- 使用
map()对data中的每个嵌套数据框进行计算。 - 在 map 函数内部，创建一个汇总数据框，其中包含平均收盘价、平均成交量，以及年度百分比回报率。您可以查看
by_symbol$data[[1]]，回忆可用的列名。
交互式实操练习
通过完成这段示例代码来试试这个练习。
library(trelliscopejs)
library(dplyr)
library(purrr)
annual_return <- function(x)
100 * (tail(x$close, 1) - head(x$open, 1)) / head(x$open, 1)
# Compute by_symbol_avg
by_symbol_avg <- mutate(by_symbol,
stats = ___(___, function(x) {
data_frame(
mean_close = mean(x$___),
mean_volume = mean(x$___),
annual_return = annual_return(x)
)
}))