library(tidyverse)
library(skimr)Lab 08 - University of Edinburgh Art Collection
Load packages and data
# Remove eval = FALSE or set it to TRUE once data is ready to be loaded
uoe_art <- read_csv("data/uoe-art.csv")Exercise 9
uoe_art <- uoe_art %>%
separate(title, into = c("title", "date"), sep = "\\(") %>%
mutate(year = str_remove(date, "\\)") %>% as.numeric()) %>%
select(title, artist, year, ___)TO DO: Add error true
Exercise 10
Remove this text, and add your answer for Exercise 1 here. Add code chunks as needed. Don’t forget to label your code chunk. Do not use spaces in code chunk labels.
Exercise 11
…
Add exercise headings as needed.