Add purrr dependency

IT Shiny App.R

@@ -5,6 +5,7 @@ library(leaflet)
 library(sf)
 library(htmltools)
 library(dplyr)
+library(purrr)
 
 # Json of Crime Reports
 crime_json <- fromJSON(file="data.json")