Карта координат школ по всей Великобритании в существующий шейп-файл - PullRequest
Новая
       12

Карта координат школ по всей Великобритании в существующий шейп-файл

0 голосов
/ 12 июня 2019

У меня есть ранее существовавшая shapefile Великобритании, которая была предоставлена ​​мне. У меня есть отдельный CSV-файл, в котором указаны долгота и широта всех школ, которые я хочу отобразить на shapefile. 

gg <- ggplot()
gg <- gg + geom_polygon(data=polys.df.phec, aes(x=long, y=lat, group=group, fill=NA), color = "black", fill=NA, size=0.5) 
gg <- gg + geom_point(data=subset_practice, aes(x=lon, y=lat, color="red"),inherit.aes = FALSE)
gg <- gg +  coord_map()
gg

Мне успешно удалось получить карту Великобритании в качестве сюжета 

 ls()

 head(polys.df.phec)

 map13 <- ggplot(data = polys.df.phec, aes(x = long, y = lat, group = group))

 map13 + geom_path()

Я ожидал получить точки данных на карте, но я получаю сообщение об ошибке: «Система координат уже присутствует. Добавление новой системы координат, которая заменит существующую». и

Ошибка в FUN (X [[i]], ...): объект 'lon' не найден

1 Ответ

1 голос
/ 12 июня 2019

Да, воспроизводимый пример мог бы помочь ... тем временем, вот некоторый код, который я использовал, изучая, как отображать точки широты и долготы в шейп-файле. 

ggmap(sydmap2) +
  geom_point(data = crime, aes(x = bcsrgclng, y = bcsrgclat), color = "purple4", alpha=.03, size=1.1) +
  #ggtitle("Sydney Outdoor Crime") +
  labs(title = "Sydney Outdoor Crime", x = "", y = "") +
  theme(plot.title = element_text(size = 24), 
        axis.text.x = element_blank(), axis.ticks = element_blank(),
axis.text.y = element_blank())

По сути, я вызываю шейп-файл карты в операторе ggmap(), затем использую geom_point(), чтобы идентифицировать набор данных с координатами широты / долготы. Другие вызовы - для раскраски точек, форматирования осей и т. Д. *

Это код, измененный с этого урока , который я нашел полезным при изучении основ картографии.

...