r-leaflet

    1热度

    1回答

    半径我有一个“问题”与小叶addCircleMarkes 示例数据集半径: lat long number - - 4 - - 26 - - 13 - - 40 - - 30 我改变圆标记的半径在地图radius = ~ifelse(data$number <=25, 2, ifelse((data$number > 25 & data$number <=50),

    2热度

    2回答

    继续从this问题,我正在寻找保存并下载一张传单地图作为PNG或JPEG图像。我有下面的代码,但我不断收到错误。 ui <- fluidPage( leafletOutput("map"), downloadButton("dl") ) server <- function(input, output, session) { output$map <- rende

    0热度

    1回答

    所以我试图动态显示我以前计算过的一些栅格图层。我需要更新标记和显示图像上显示的值。 它可以正常使用标记,但它似乎没有对addRasterImage命令做任何事情。任何帮助?代码: library(shiny) library(leaflet) library(RColorBrewer) #### Mapa en shiny #### ui <- bootstrapPage( ta

    2热度

    4回答

    我想绘制流程图(对于新加坡)。我有Entry(Lat,Long)和Exit(Lat,long)。我试图在新加坡地图上显示从入口到出口的流量。 structure(list(token_id = c(1.12374e+19, 1.12374e+19, 1.81313e+19, 1.85075e+19, 1.30752e+19, 1.30752e+19, 1.32828e+19, 1.70088e+

    1热度

    1回答

    请参阅以下MWE: library(shiny) library(leaflet) ui <- fluidPage(leafletOutput("mymap")) server <- function(input, output, session) { output$mymap <- renderLeaflet({ leaflet() %>% addPr

    1热度

    1回答

    我试图根据许多国家代码列表将多个多边形添加到传单世界地图。我试图使用R循环来添加多边形。下面是我手动从列表1中添加多边形代码: library(sp) library(raster) library(leaflet) library(maps) library(tidyverse) countries_1 <- c('PAK','TUR','BGR') adm1 <- getDat

    1热度

    1回答

    我正在使用leaflet.extras包中的suspendScroll()来防止我的地图在滚动浏览器时缩放。然而,功能的等待时间 - 也就是睡眠传单地图在徘徊时醒来 - 所花的时间太短。有没有延长延迟时间的方法,或者只有当我点击地图时才能使传单地图醒来? library(leaflet) library(leaflet.extras) donkey <- leaflet() %>%

    1热度

    1回答

    我正在使用Shiny和Flexdashboard构建Leaflet地图。地图隐藏在使用条件面板的介绍文本后面。它在用户从输入中进行选择后首次加载。 最初的output$map应该只加载一次(由于大型多边形图层不需要重新加载),但是只要用户输入更改就会更新地图标记。 第一次加载地图时,它不加载标记。如果地图加载后输入发生变化,标记会正确加载。 我的目标是在第一次选择后加载地图标记。 我不包括addC

    0热度

    1回答

    我想绘制使用传单的线条,但是我在分隔段时遇到了一些困难。我有一个对象,看起来像这样 > head(trips, n=15) time.start time.end long.start long.end lat.start lat.end distance time.diff speed color 1 1476450598 1476450713 9.03913 9.03924 45

    1热度

    1回答

    此问题与this one和this one有关。 在JavaScript中有两种解决方案。 我根本不知道JS,想知道这些解决方案如何适应R包装小册子。