用ggmap绘制多边形数据

Question

我正在尝试使用ggmap绘制多边形数据，但是系统崩溃了，不知道为什么。我的area数据帧看起来像这样：

> head(area)
      long     lat order  hole piece id group
1 190393.2 5794527     1 FALSE     1  0   0.1
2 190474.4 5794516     2 FALSE     1  0   0.1
3 190573.0 5794533     3 FALSE     1  0   0.1
4 190619.4 5794580     4 FALSE     1  0   0.1
5 190619.4 5794620     5 FALSE     1  0   0.1
6 190619.4 5794661     6 FALSE     1  0   0.1

我得到一张地图作为基础层：

chile <- get_map(location = "Chile", zoom = 6, maptype = "toner", source = "stamen")

现在我将其绘制：

ggmap(chile, base_layer = ggplot(data = area, aes(long, lat))) +
  geom_path(aes(color = id))

我已经尝试了很多次此代码，但它要花很长时间，最终会崩溃。关于发生了什么的想法？