ggplot(data = results, mapping = aes(x = neighborhoods, y = med_svc_wait_times)) +
  geom_col(color = "#006EA1") +
  labs(title = "Median Time to Complete Service Requests in Baltimore City",
       x = "Neighborhood",
       y = "Median Time (Days)") +
  theme_light() + theme(axis.text.x = element_text(angle = 90, hjust = 1))