addPolygons не отображает данные формы на блестящем сервере - PullRequest
0 голосов
/ 28 февраля 2019

Я пытаюсь создать карту с бразильскими штатами, когда я запускаю этот код в файле пользовательского интерфейса, он работает хорошо.Но мне нужно создать реактивную карту, поэтому я написал ее в файле сервера.

Карта отображается нормально, но данные формы не помогают ... Любая помощь?

 server <- shinyServer(function(session, input, output) {
    BrasilianStates <- readOGR("UFEBRASIL.shp",encoding = "UTF-8")
    output$map <- renderLeaflet

({                                                       #RENDERIZACAO DO MAPA


leaflet(data = BrasilianStates) %>% addTiles()%>%
addMarkers(data= CDDs,icon = iconeCDD, popup = nomes, clusterOptions = markerClusterOptions())%>%
addPolygons(data = BrasilianStates,weight = 2,
                        opacity = 1,
                        color = "#660000",
                        dashArray = "3",
                        fillOpacity = 0.7, highlight = highlightOptions(weight = 5, color = "#666",dashArray = "", fillOpacity = 0.7,
                                                                                                                bringToFront = TRUE)) })

Когда я запускаютолько в консоли:

leaflet(data = BrasilianStates) %>% addTiles()%>%
addMarkers(data= CDDs,icon = iconeCDD, popup = nomes, clusterOptions = markerClusterOptions())%>%
addPolygons(data = BrasilianStates)

графики отлично работают на вкладке средства просмотра справа от RStudio.

Но когда я пытаюсь использовать файл сервера в блестящем приложении, он не отображается.

1 Ответ

0 голосов
/ 05 марта 2019

Я думаю, это может быть потому, что BrasilianStates - это локальные данные.Посмотрите на этот пост развертывание блестящего приложения, которое использует локальные данные

...