我想绘制一组在世界地图上的研究/组中组织的坐标,在图例中指定。数据集的组织如下:AUTHORS |拉特|长 对应于一个没有差异的研究的多个坐标。 是否可以绘制数字而不是符号并将它们链接到图例?
library(maps)
library(mapdata)
test<-data.frame(Authors=(letters[1:9]), LAT=(seq(10,90,by=10)), LONG=(seq(10,90,by=10)))
map('worldHires')
points(test$LONG,test$LAT, col="red")
我不知道如何从作者向量中提取信息并将其作为图例的一部分链接到纬度/经度数据。它甚至适用于points
吗?
答案 0 :(得分:1)
library(maps)
library(mapdata)
test<-data.frame(Authors=(letters[1:9]), LAT=runif(9,-90,90), LONG=runif(9,-180,180))
map('worldHires')
text(test$LONG,test$LAT,labels=1:9, col="red", font=2)
legend("bottom",legend=test$Authors, col="red", pch=as.character(1:9), bg="white", ncol=3)
使用text
代替points
(您可以使用points
,但必须选择pch=as.character(1:9)
)。在这里,我添加了参数font=2
,使它们以粗体显示,使它们更清晰
然后创建传奇是相当直接的。