Real-time traffic flow and incident information based on the ‘HERE
Traffic’ API. The traffic flow data contains speed ("SP"
)
and congestion (jam factor: "JF"
) information. Traffic
incidents contain information about location, time, duration, severity,
description and other details.
In order to request the traffic flow, areas of interest (AOIs) have
to be provided. The AOIs must be an sf
object containing a
polygon or multiple polygons. The response from the HERE Traffic API
will be spatially joined on the AOIs and thereby the traffic flows are
mapped to the corresponding polygon.
<- flow(
flows aoi = aoi[aoi$code == "LI", ]
)
Print the (ordered) ‘jam factor’ of the traffic flow on an interactive leaflet map:
<- flows[order(flows$JF), ]
flows rownames(flows) <- NULL
if (requireNamespace("mapview", quietly = TRUE)) {
::mapview(flows,
mapviewzcol = "JF",
lwd = round(flows$JF*2),
layer.name = "Jam factor",
map.types = c("Esri.WorldTopoMap"),
homebutton = FALSE
) }
AOIs also must be provided in order to request information about
traffic incidents in specific regions. The time interval, which defines
the traffic incidents that should be considered, can be specitified by
the from
parameter. The datetime information passed to the
function must be a timestamp of type POSIXct
. By default,
the time interval is defined as the last week.
<- incident(
incidents aoi = aoi[aoi$code == "LI", ],
from = Sys.time()-60*60
)
Print the traffic incidents on an interactive leaflet map:
if (requireNamespace("mapview", quietly = TRUE)) {
::mapview(incidents,
mapviewzcol = "type",
layer.name = "Incident type",
map.types = c("Esri.WorldTopoMap"),
homebutton = FALSE
) }