使用 ggmap 在同一张地图上绘制两个数据集

Plot two datasets on the same map with ggmap

我有两个数据集,钻井和地震。当我尝试在俄克拉荷马州地图上分别绘制两者时,效果很好。但是我想生成一个包含这两个数据的地图。 我用于映射的代码是:

Okla_sat_map <- get_map(location="Oklahoma", maptype="satellite", 
                        color="color", zoom=10)

ggmap(Okla_sat_map) + 
geom_point(aes(longitude, latitude, size=mag), colour="red", 
           data=earthquake.df, na.rm=T)

钻孔数据:

Okla_sat_map <- get_map(location="Oklahoma", maptype="satellite", 
                        color="color", zoom=10)

ggmap(Okla_sat_map) + 
geom_point(aes(longitude, latitude, size=mag), colour="red", 
           data=drill.df, na.rm=T)

我的数据有点像这样 钻探数据

    LATITUDE    LONGITUDE
1   36.85323    -98.38950
2   36.79886    -98.36245
3   36.66833    -98.26780
4   36.62468    -98.52917
5   36.53371    -98.10989
6   36.55837    -98.34455
7   36.55837    -98.34455
8   36.54467    -98.49612
9   36.51204    -98.16827
10  36.47222    -98.42875
11  36.61746    -98.51564

地震数据:

   longitude   latitude     mag
1   -97.4381    35.8336     3.0
2   -97.5731    36.1325     3.4
3   -99.0309    36.5110     3.1
4   -97.2297    35.8498     3.1
5   -97.5508    36.1254     3.0
6   -97.5460    36.2927     3.0
7   -97.8245    36.7062     3.0
8   -97.4250    35.8509     4.3
9   -97.4240    35.8219     3.1
10  -97.2674    36.2660     3.0
11  -97.0372    36.1966     3.1

请帮我把这两个数据绘制到一张地图上。

添加名为 e.g. 的阶乘变量列'type' 对两个数据集,将drilling中的类型设置为drilling,将earthquake中的类型设置为earthquake,然后通过rbind合并数据集。 然后用例如 colour=type 绘制如上图,用不同的颜色显示两组。