R 是“缩小”HTML 文件？

Question

有没有人遇到过 R “缩小” HTML 文件大小的问题？

我在 R 中创建了这些地图：

library(leaflet)
library(leaflet.extras)
id = 1:1000
long = 2.2945 + rnorm( 1000, 0.1085246 , 0.1)
lat = 48.8584 + rnorm( 1000, 0.009036273 , 0.1)
my_data_1 = data.frame(id, lat, long)
id = 1:1000
long = 2.2945 + rnorm( 1000, 0.1085246 , 0.1)
lat = 48.8584 + rnorm( 1000, 0.009036273 , 0.1)
my_data_2 = data.frame(id, lat, long)


map1 = my_data_1 %>%
    leaflet() %>%
    addTiles() %>%
    addHeatmap(lng=~long,lat=~lat,max=100,radius=20,blur=10)

map2 = my_data_2 %>%
    leaflet() %>%
    addTiles() %>%
    addHeatmap(lng=~long,lat=~lat,max=100,radius=20,blur=10)

map3 = my_data_1 %>% 
    leaflet() %>% 
    addTiles() %>% 
    addMarkers(clusterOption=markerClusterOptions())

然后我将它们保存为 HTML 文件：

library(flexdashboard)
library(htmltools)
library(htmlwidgets)
library(plotly)

htmlwidgets::saveWidget(as_widget(map1), "m1.html")
htmlwidgets::saveWidget(as_widget(map2), "m2.html")
htmlwidgets::saveWidget(as_widget(map3), "m3.html")
htmlwidgets::saveWidget(as_widget(map4), "m4.html")

然后，当我尝试在 R 的交互式仪表板中呈现这些 HTML 文件时：

Column {.tabset}
-------------------------------------
   
### map 1

<object type="text/html" data="m1.html"></object>

### map 2

<object type="text/html" data="m2.html"></object>

### map 3

<object type="text/html" data="m3.html"></object>

这些地图在 R 中似乎“缩小了”：

• 有谁知道为什么会发生这种情况以及我可以做些什么来解决这个问题？

谢谢！

Answer 1

我认为，您正在找到此解决方案：

<!-- code -->

<style>
.one {
    width: 100%;
    height: 100%;
}
</style>

<!-- code -->

Column {.tabset}
-------------------------------------

### map 1

<object class="one" type="text/html" data="m1.html"></object>

<!-- code -->