Click here for slides!
Load libraries:
library(tidyverse)
Load data:
roster = read_csv("data/sample_roster.csv") form_output = read_csv("data/githubUsernames.csv")
Join:
roster %>% left_join(form_output, by = "net-id-email")