我想在 ggmap 上绘制热图。
library(ggmap)
turku<-get_map('turku', zoom=13)
turkumap<-ggmap(turku, extent="device", legend="topleft")
turkumap
turkumap+geom_density2d(mapping=aes(x = lon, y = lat),data = test, )
我们进行了测量活动,所以我有 4460 个地理参考点。
为了制作预测图,我创建了一个 400*400 的网格,共有 160000 个点,我在其中使用克里金法计算预测。为了全面了解我的 3 公里 * 3 公里的现象,我认为某种热图是必要的,因为只绘制点,如果我没有做错任何事情,就会在地图上绘制一个实心正方形。(见文件)我用来绘制点的代码是:
turkumap <- turkumap + geom_point(data=temp, aes(x=lon, y=lat),size=var1.pred)
所以基本上问题是这些点是沿着道路的,所以热图是有问题的(见这里)并且有太多的点无法单独绘制它们。有什么建议么?
另一个相关的问题是我的数据是gstat的经典格式SpatialPointsDataFrame,这意味着我必须强制它们成为数据框才能使用ggplot,有更好的做法吗?