使用R

Question

我想在地图中绘制多边形。为此，我现在使用ggmap，但它不会让我这样做总是给我一个错误信息：

  

Fehler：二元运算符的ggplot2无数字参数

我的代码如下所示：

> library(rgdal)
> library(geojsonio)
> library(sp)
> library(maps)
> library(ggmap)
> library(maptools)

> data_file <- "/home/jan/Downloads/map.geojson"

> data_json <- geojson_read(data_file, what = "sp")

> plot(data_json, usePolypath = FALSE)

> mapImage <- ggmap(get_googlemap(c(lon = -118.243683, lat = 34.052235), scale = 1, 
+                                 zoom = 7), extent = "normal")
Map from URL : http://maps.googleapis.com/maps/api/staticmap?center=34.052235,-118.243683&zoom=7&size=640x640&scale=1&maptype=terrain&sensor=false

> dat <- as.data.frame(data_json)

> names(data)[1:2] <- c("lon","lat")

> print(mapImage)+
+   geom_polygon(data = dat, aes(lon, lat), colour="red", fill="red")

Fehler in print(mapImage) + geom_polygon(data = dat, aes(lon, lat), colour = "red",  : 
  nicht-numerisches Argument für binären Operator

但如果我这样做

> dat2 <- as.numeric(dat)

> print(mapImage)+
+   geom_polygon(data = dat2, aes(lon, lat), colour="red", fill="red")
Fehler: ggplot2 doesn't know how to deal with data of class numeric

我收到错误

  

ggplot2不知道如何处理类数字

的数据

PS。我是R和编程的新手

谢谢

Answer 1

此：

data_json <- geojson_read(data_file, what = "sp")

返回sp类对象，ggplot和geom_polygon无法处理。

修复方法是在其上运行fortify以生成geom_polygon可以使用的数据框。您没有向我们提供您的数据文件，因此我们无法为您提供确切的代码，但是：

data_file <- system.file("examples", "california.geojson", package = "geojsonio")
data_json <- geojson_read(data_file, what = "sp")
fd = fortify(data_json)
mapImage + geom_polygon(data=fd, aes(x=long,y=lat))

应该给你足够的线索。