scoobydoo = tuesdata$scoobydoo # wrangling data into nice shape monsters_caught = scoobydoo %>% select(date_aired, starts_with("caught")) %>% mutate(across(starts_with("caught"), ~ as.logical(.))) %>% pivot_longer(cols = caught_fred:caught_not, names_to = "character", values_to...
Since first appearing in 1969, Scooby-Doo has become a popular culture icon, with numerous references made to it over the years. Scooby-Doo has even entered the language - in the United Kingdom, Scooby-Doo has been used as rhyming slang to mean "Clue",[1