Animate join functions in slides

[bensoltoff]

Use tidyexplain and animations to demo these techniques.

[bensoltoff]

Example

library(tidyverse)
library(rcfss)
library(tidyexplain)
#> Loading required package: gganimate

data("superheroes")

# need to have exactly one row for each publisher in each table
# otherwise tidyexplain triggers an error
superheroes <- slice(.data = superheroes, c(1, 4, 7))

animate_full_join(x = superheroes, y = publishers, by = "publisher",
                  text_size = 5, cell_width = 1.3)
#> Warning: `data_frame()` was deprecated in tibble 1.1.0.
#> Please use `tibble()` instead.

^{Created on 2021-11-15 by the reprex package (v2.0.1)}