Shiny 带有闪亮手机的Mapdeck

我的大多数应用程序用户使用手机访问它。Mapdeck运行良好，在笔记本电脑/台式机上可以很好地显示“添加网格”和“添加热图”，但这两种功能都不会出现在手机上。请参阅我的笔记本电脑附带的屏幕截图。请提供帮助，以便在手机上显示相同的信息

以下是服务器端的代码：

output$myMap <- renderMapdeck({
      data_filter$val <- sample(1:10, size = nrow(data_filter), replace = T)
      mapdeck( style = mapdeck_style("dark"), pitch = 55, zoom = 4) %>%
        add_grid(
          data = data_filter
          , lat = "lat"
          , lon = "lng"
          , layer_id = "hex_layer"
          , elevation_scale = 1
          , elevation_function = "mean"
          , elevation = "val"
          , colour = "val"
          ,cell_size = 10
        ) %>%
        add_heatmap(
          data = data_filter
          , weight = "val",
          layer_id = "heatmap_layer"
        )
    })

---

这并不是一个简单的解决方案，因为deck.gl层的性能取决于用于渲染它们的浏览器和硬件。我已经做了一个测试，我们可以测试这个。你能去那个链接帮我试试吗？

f7Tab(
          tabName = "2.5D View",
          
          icon = f7Icon("layers_alt"),
          active = FALSE,
          f7Shadow(
            intensity = 10,
            hover = TRUE,
            f7Card(
              title = "Card header",
              mapdeckOutput(
                outputId = 'myMap'
              )
            ))