先说第一种，最早应该是从maps包开始的，这个包里没记错的话应该用map函数为主，
>map("world", fill = TRUE, col = rainbow(200),ylim = c(-90, 90), mar = c(0, 2, 0, 0))
>title("worldmap")
这种用法大家应该很熟了，比较可惜的是里面的数据是在是太少了，连张中国地图都画不了，好在后来有了mapdata等一系列的包，CRAN上maps包后面那一串全是。
具体的内容看一下文档就ok啦，可是问题又来了，R包里的数据总是不够用的，而且还不新，这个时候就可以考虑sp包了，包里的spplot函数可以用来画地图
1、将数据通过group，by分组，之后n负1会返回每组中倒数第二的位置，之后slice，n负1提取我们要的数据。2、通过group，split将数据源转换为list，使用map函数将在list每个子项中使用，增加代码ungroup即可。
