Warning: file_get_contents(/data/phpspider/zhask/data//catemap/4/r/65.json): failed to open stream: No such file or directory in /data/phpspider/zhask/libs/function.php on line 167

Warning: Invalid argument supplied for foreach() in /data/phpspider/zhask/libs/tag.function.php on line 1116

Notice: Undefined index: in /data/phpspider/zhask/libs/function.php on line 180

Warning: array_chunk() expects parameter 1 to be array, null given in /data/phpspider/zhask/libs/function.php on line 181
R 将英国各地学校的坐标映射到现有形状文件_R_Ggplot2_Ggmap - Fatal编程技术网

R 将英国各地学校的坐标映射到现有形状文件

R 将英国各地学校的坐标映射到现有形状文件,r,ggplot2,ggmap,R,Ggplot2,Ggmap,我有一个预先存在的英国的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=su

我有一个预先存在的英国的
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

gg是的,一个可复制的示例会有所帮助……同时,这里是我在学习如何在shapefile上映射lat/long点时使用的一些代码

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()
语句中调用map shapefile,然后使用
geom_point()
用lat/long坐标标识数据集。其他调用是为点着色、格式化轴等


这是我发现有助于学习地图基础知识的代码修改。

如果您能提供一个可复制的示例供其他人帮助,这将非常有用。StackOverflow上的任何人都不能使用您的对象
polys.df.phec
subset\u practice
来帮助回答您的问题,因为它们是R会话特有的。
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())