Итак, я написал блестящее приложение для приборной панели, которое отлично работает на моем ноутбуке, но когда я развернул его в shinyapp.io (вместе со всеми необходимыми файлами), оно не работает.Я решил проблему и сузил ее до label
секции addPolylines
в своем сегменте листовок.Кажется, что когда я добавляю as.character
перед полем метки, просматривая файлы журнала, это дает мне ошибку Error in sum: invalid 'type' (list) of argument
.как только я удаляю «as.character», он не выдаёт мне эту ошибку, но затем не показывает метки, как это должно быть.соответствующий раздел кода ниже.Я могу поделиться больше, если кому-то нужно больше.Любая помощь очень ценится.Спасибо!
ISTDMNet <- st_read(paste(getwd(),"/Input/2015_loaded_Sample.shp", sep = ""))
output$map <- renderLeaflet({
my_map <- leaflet() %>% addTiles() %>% setView(lat = 39.764075, lng = -86.159019, zoom = 10)
my_map <- addPolylines(my_map, data = ISTDMNet, smoothFactor = 1, opacity = 1,
label = as.character(ISTDMNet$ID),
color = "gray", layerId = ISTDMNet$ID, weight = 3
)
my_map
})