Rworldmap 中国家名称的移动位置

Question

有没有办法在 rworldmap 生成的地图上移动国家名称的位置？例如，在下面的示例中，我想移动中美洲国家的名称，以便于阅读。

如果没有，我欢迎就标记地图的替代方法提出建议。谢谢。

library(rworldmap)  
df <- NULL  
df$country <- c("El Salvador","Mexico","Panama", "Nicaragua", "Costa Rica",       "Cuba", "Honduras", "Guatemala", "Venezuela")  
df$code<-c("SLV", "MEX", "PAN", "NIC", "CRI", "CUB", "HON", "GTM", "VEN")  
df$number<-c(100, 500, 200, 150, 300, 390, 140, 330, 60)  
df<-as.data.frame(df)  
sPDF <- joinCountryData2Map( df, joinCode = "ISO3", nameJoinColumn = "code") 
mapCountryData(sPDF, nameColumnToPlot="number") 
sPDFmyCountries <- sPDF[sPDF$NAME %in% df$country,] 
mapCountryData(sPDFmyCountries, nameColumnToPlot="number", catMethod="fixedWidth", colourPalette="heat", borderCol="black",  mapTitle = ("Made Up Number"))
text(sPDFmyCountries, labels="NAME")

Answer 1

您可以只在空间或标准数据框中创建一个偏移列，并将其应用为文本标签位置的参数。（我和上面的评论有同样的问题，所以我只是把spdf转换成一个普通的df）：

mapCountryData(sPDFmyCountries, nameColumnToPlot="number", catMethod="fixedWidth", colourPalette="heat", borderCol="black",  mapTitle = ("Made Up Number"))
df2=as.data.frame(sPDFmyCountries)
df2$latOffset=4 #4 degree offset
df2$lonOffset=4
text(df2$LON+df2$latOffset, df2$LAT+df2$lonOffset, labels=df2$country)

鉴于您映射的国家/地区的排列方式，我不知道您是否会找到一种解决方案，该解决方案会自动整理重叠的文本框，不会将名称偏离一些较小的国家/地区太远，所以我想您可能想根据自己的喜好调整各个偏移列...

如果您确实想找到一种自动整理标签的方法，似乎有一些资源可供使用： https://stats.stackexchange.com/questions/16057/how-do-i-avoid-overlapping-labels-in-an-r-plot

Rworldmap 中国家名称的移动位置

Moving position of country names in Rworldmap

r

maps

rworldmap