如果Map包含多边形，请考虑rmapshader::ms_simplify()，它使用Visvalingam algorithm来减少用于构建多边形的点数。
下面是一个可重复的示例：

p  <- raster::shapefile(system.file("external/lux.shp", package = "raster")) # load data
p2 <- rmapshaper::ms_simplify(p, keep_shapes = TRUE) # simplify polygons

现在可视化结果：

par(mfrow = c(1,2))
plot(p,  main = paste("before:", object.size(p),  "bytes"))
plot(p2, main = paste("after:",  object.size(p2), "bytes"))
dev.off()

您可以编辑keep参数的默认设置，减少要保留的点数，从而进一步减小对象大小。这是以较粗糙的图像为代价的。