gt_make_raster_from_grid {googletraffic} | R Documentation |
Make Google Traffic Raster Based on Grid of Coordinates
Description
Make a raster of Google traffic data, where each pixel has one of four values indicating traffic volume (no traffic, light, moderate, and heavy).
Usage
gt_make_raster_from_grid(
grid_param_df,
google_key,
traffic_color_dist_thresh = 4.6,
traffic_color_dist_metric = "CIEDE2000",
webshot_zoom = 1,
webshot_delay = NULL,
return_list_of_rasters = FALSE,
print_progress = TRUE
)
Arguments
grid_param_df |
Grid parameter dataframe produced from |
google_key |
Google API key, where the Maps JavaScript API is enabled. To create a Google API key, follow these instructions. |
traffic_color_dist_thresh |
Google traffic relies on four main base colors: |
traffic_color_dist_metric |
See above; this parameter changes the metric used to calculate distances between colors. By default, |
webshot_zoom |
How many pixels should be created relative to height and width values. If |
webshot_delay |
How long to wait for Google traffic layer to render. Larger height/widths require longer delay times. If |
return_list_of_rasters |
Instead of merging traffic rasters produced for each grid together into one large raster, return a list of rasters (default: |
print_progress |
Whether to print function progress (default: |
Value
Returns a georeferenced raster. Raster pixels can contain the following values: 1 = no traffic; 2 = medium traffic; 3 = high traffic; 4 = heavy traffic.
References
Markus Hilpert, Jenni A. Shearston, Jemaleddin Cole, Steven N. Chillrud, and Micaela E. Martinez. Acquisition and analysis of crowd-sourced traffic data. CoRR, abs/2105.12235, 2021.
Pavel Pokorny. Determining traffic levels in cities using google maps. In 2017 Fourth International Conference on Mathematics and Computers in Sciences and in Industry (MCSI), pages 144–147, 2017.
Examples
## Not run:
## Grab polygon of Manhattan
us_sp <- raster::getData('GADM', country='USA', level=2)
ny_sp <- us_sp[us_sp$NAME_2 %in% "New York",]
## Make Grid
grid_df <- gt_make_grid(polygon = ny_sp,
height = 2000,
width = 2000,
zoom = 16)
## Make raster from grid
r <- gt_make_raster_from_grid(grid_param_df = grid_clean_df,
google_key = "GOOGLE-KEY-HERE")
## End(Not run)