if (FALSE) {
data <- get_osm_data("City of London, United Kingdom")
green_areas_data <- data$green_areas
tree_data <- data$trees
hex_map <- hexGreenSpace(green_areas_data, tree_data, hex_size = 300)
print(hex_map$map) # Display the hex bin map
print(hex_map$violin) # Display the violin plot
}
Run the code above in your browser using DataLab