Oops! Data you're looking for is NA
at the moment ...
library(stats220)
dr_wang() %>%
work_hard(on = c("lecture slides", "lab exercise", "assignment", "data")) %>%
replace_na(with = "fun") %>%
thank_you(for = "reading :)")