我希望能够为充满国家的手绘制我自己的价值观。例如:中国、美国、英国、加拿大和俄罗斯。
我有自己的 txt 文件,它有 3 列 - ISO3V10、国家和文档编号。
ISO3V10 Country No of Documents
CAN Canada 30
CHN China 20
RUS Russia 10
GBR United Kingdom 38
USA United States 50
我们的想法是为 绘制世界地图,Country
并且绘制的数据是No of Documents
。
到目前为止,我已经这样做了:
myData2 <- read.delim("noofdocuments.txt",header=T, sep='\t')
names(myData2)
myData2[]
jessdata <- data.frame(myData2=c("China", "United States", "United Kingdom",
"Russia", "Canada"))
sPDF <- joinCountryData2Map(jessdata,
joinCode = "NAME",
nameJoinColumn = "myData2")
par(mai=c(0,0,0.2,0),xaxs="i",yaxs="i")
mapCountryData(sPDF, nameColumnToPlot="REGION")
理想情况下,我希望 sPDF 是:
sPDF <- joinCountryData2Map(countryExData,
joinCode = "ISO3", nameJoinColumn = "ISO3V10")
也为 REGION 是:
mapCountryData(sPDF, nameColumnToPlot="No.of.Documents")
我已经尝试了所有可能的方法来做到这一点,这就是为什么我将 REGION 作为 nameColumnToPlot,因为这是我可以让它工作的唯一方法。
有人能告诉我代码哪里出错了吗?