2016-06-21 122 views
0

我在我闪亮的应用中渲染了一些传单地图,问题在于传说中的地图显示不正确,图例项目非常奇怪(图2) 。我在R studio和Rstudio Viewer中创建了相同的地图,图例项目对齐方式正确(图像1)。
我已经尝试在我闪亮的代码中使用CSS标签来自定义图例,但没有任何工作。传单中的传说物品没有正确显示(对齐)

This it how the legend looks in viewer when I create the leaflet map in rstudio

This is how it looks in browser via shiny app

下面是示例代码显示如何我呈现单张情节(以及CSS标签的例子,我已经试过)。我不知道为什么这些项目是这样显示的。我真的很感谢你的帮助。

... 
tabPanel("plot", 
    tagList(
    tags$head(
     tags$style(
     ".leaflet .legend {width:200px; text-align: left;}", 
     ".leaflet .legend i{float: left;}", 
     ".leaflet .legend label{float:left; text-align: left;}" 
     ) 
    ) 
), 

    leafletOutput("leaflet_plot", width = 800, height = 550) 
) 
... 

# code to create leaflet 
output$leaflet_plot <- renderLeaflet({ 
    pal <- c("#F1F1F1", brewer.pal(5, "YlOrBr")) 
    opts <- providerTileOptions(opacity = 0) 
    map <- leaflet(shape_file) %>% addProviderTiles("CartoDB.PositronNoLabels", options = opts) 
    map <- map %>% addPolygons(fillColor = ~colorFactor(pal, shape_file$var)(var) 
    map <- map %>% addLegend("bottomleft", title = "Employment/Acre", pal = colorFactor(pal, NULL), values = ~var) 
    map 
}) 

感谢,
阿希什

+2

请发布一个可重复的例子。 –

+0

同样的问题,添加到我的CSS作为亚当引用如下: div.info.legend.leaflet-控制br { 明确:都; } –

回答

0

如果浏览器的缩放级别超过100%,这可能发生。 看看这个duplicate post有一个可重复的例子。