add control flow, dplyr + hands-on and start of ggplot