search for: ppp_data

...ical Service", "Emergency Medical Service")) #add necessary libraries library(sp) library(maptools) library(spatstat) library(RColorBrewer) #add coordinates to data coordinates(data) = c("xcoord", "ycoord") #convert coordinates to spatstat point pattern dataset ppp_data = as(data["itype"], "ppp") #determine density of point pattern density_data = density.ppp(ppp_data) #plot density plot(density_data, col=brewer.pal(9, "Reds")) -- Markus Weisner, Firefighter Charlottesville Fire Department 203 Ridge Street Charlottesville, Virginia...