Pontifications

(Step 2 is to remove those >100 occurrences whose neighborhoods aren't in the city of Vancouver, like North Vancouver, Whistler, Squamish, Burnaby, etc)

count_ig_van_neighbourhood_2015  <-
  ig_van_neighbourhood_2015 %>% 
  add_count(neighbourhood, sort = TRUE) %>% 
  filter(n > 100)

write.csv(count_ig_van_neighbourhood_2015, 
          file = "count_ig_van_2015-colour-lat-long-date-neighborhood.csv",
          row.names=FALSE)