# NOT RUN {
flights_dm <- dm_nycflights13()
dm_zoom_to(flights_dm, flights) %>%
left_join(airports, select = c(faa, name))
# this should illustrate that tables don't necessarily need to be connected
dm_zoom_to(flights_dm, airports) %>%
semi_join(airlines, by = "name")
# }
Run the code above in your browser using DataLab