Explicitly used dplyr's contains as there's a conflict with purrr

See tidyverse/purrr#217. This will be fixed in the next release.

run.R

@@ -274,15 +274,15 @@ if (want_to_bulk){
   meta_base <- data_frame()
   # for(i in 60:nrow(csv_data)){
   for(i in 1:nrow(csv_data)){
-    if (i %in% c(36 # excange rate
+    if (i %in% c(36 # exchange rate
                  )) next()
     df <- read_csv(csv_data$filepath[i])
     names(df) <- tolower(gsub(" |\\.", "", names(df)))
     names(df) <- ifelse(names(df) %in% vardata$old, 
                         vardata$new[match(names(df), vardata$old)],names(df))
     if (any(grepl("-",df$year))) df$year <- as.character(as.integer(gsub("-.+$", "", df$year)) + 1)
     df %>% 
-      select(-contains("year"), -contains("country"),-contains("flag")) %>% 
+      select(-dplyr::contains("year"), -dplyr::contains("country"),-dplyr::contains("flag")) %>% 
       distinct() %>% 
       mutate(unit = as.character(unit)) %>% 
       bind_rows(meta_base, .) -> meta_base