R: Сгруппированные координаты на карте мира
Я хотел бы нанести на карту мира набор координат, организованных в исследованиях / группах, указанных в легенде. Набор данных организован следующим образом: АВТОРЫ | ЛАТ | LONG Многократные координаты, соответствующие одному исследованию, которые не отличаются. Можно ли построить цифры вместо символов и связать их с легендой?
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")
Я понятия не имею, как извлечь информацию из вектора авторов и связать ее с данными lat/long как часть легенды. Это даже работает с points
?
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
так что они выделены жирным шрифтом, что делает их более разборчивыми.
Тогда создание легенды довольно просто.