我有一系列坐标,从中采集了数据,下面是其中一个在地图上的实例:
library(ggplot2)
library(ggmap)
library(dismo)
lon <- c(-64.723946, -64.723754, -64.723808, -64.724004)
lat <- c(32.350843, 32.350783, 32.350618, 32.350675)
df <- as.data.frame(cbind(lon,lat))
mapgilbert <- get_map(location = c(lon = mean(df$lon), lat = mean(df$lat)), zoom = 18, maptype = "satellite", scale = 2)
ggmap(mapgilbert) +
geom_point(data = df, aes(x = lon, y = lat, fill = "red", alpha = 0.8), size = 5, shape = 21) +
guides(fill=FALSE, alpha=FALSE, size=FALSE) +
scale_x_continuous(limits = c(-64.725, -64.723), expand = c(0,0)) +
scale_y_continuous(limits = c(32.350, 32.351), expand = c(0,0))
这是它生成的图像: 我想在地图上的南北和东西两点之间画一条线,形成一个十字架。但我希望这条线由点组成,而不仅仅是一条线,所以我需要计算出这些点的坐标。这些线大约有30米长,我需要每米一个点。我感觉 sp 包可能可以实现这样的功能,但我无法弄清楚如何做到。谢谢,Kez
oce::geodDist()
。它可能也会有所帮助。 - CephBirk