search for: density_data

...(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 22901 (434) 970-3240 [[alternative HTML version deleted]]