第14周课后作业

发布者

曾永艺

发布日期

2023年12月15日

1. 根据第十讲课程讲义的打印稿，在 📑 qmd 中键入并完成代码的运行。

2. 浏览（阅读）tidyquant 包配套的七份 📰 vignettes

3. 进一步了解 📦 {{slider 包}}，想想如何通过参数设定实现以下的移动窗口

# 模拟数据
set.seed(123456)
tbl <- tibble(
  Count = runif(16, min=100, max=320) %>% 
    as.integer(), 
  Year = 1997:2012
)
# sliding
tbl %>% 
  mutate(mean = slide_dbl(<...>))
# tiling
tbl %>% 
  mutate(mean = slide_dbl(<...>))
# stretching
tbl %>% 
  ...