как я могу добавить имена в центр моих полилиний?Я добавил фрагмент кода:
Куда мне поместить код, чтобы получить пример внизу?Текст должен быть всегда, без всплывающих окон, скрытых или парящих.
С тематической картой это будет просто tm_text ("county") в addPolylines.Заранее спасибо!
leaflet() %>%
addProviderTiles("CartoDB.Positron") %>%
addMarkers(
lng= 125.781199, lat= 39.039555,
label="fun",
labelOptions = labelOptions(noHide = FALSE, direction = "bottom", offset=c(0,5))) %>%
addPolygons(data=data,
stroke=FALSE,
smoothFactor = 0.2,
fillOpacity = 0.8,
label = lapply(list, HTML),
color= ~pal(data$data)) %>%
addPolylines(data = county,
fillColor = "transparent",
color = "#000000",
stroke = TRUE,
weight = 1.5,
smoothFactor = 0.5,
group = "county") %>%
addLegend(position = "topright",
pal = pal,
values = data$data,
title = "",
opacity = 1,
labFormat = labelFormat(suffix = " %",
transform = function(x) 100 * x))