added better attribution to maps
This commit is contained in:
parent
16d8856ed7
commit
fe10b60079
83 changed files with 27 additions and 18 deletions
|
@ -157,7 +157,7 @@ tag.map.subtitle <- tags$style(HTML("
|
|||
|
||||
subtitle <- tags$div(
|
||||
tag.map.subtitle, HTML("data from UW TOPS lab - retrieved 4/2024</br>per direction of the WisDOT Bureau of Transportation Safety")
|
||||
)
|
||||
)
|
||||
|
||||
leaflet() %>%
|
||||
addControl(title, position = "topleft", className="map-title") %>%
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue