Rè¯è¨æä¹ç»åºåºå®ç
ç»çº¬åº¦åºåå¾ï¼
1 å¦ææç»çº¬åº¦åæ ï¼ç´æ¥ç¨geodaåarcgiså°±å¯ä»¥çæå¾äºã
2 Rå¤çæ°æ®ã
3 x <- readShapePoly('bou2_4p.shp')ï¼è¿ä¸ªåéåxæ¢ä¸ªå«çï¼
ggplot(china.map,aes(x=long,y=lat)) è¿éx=lon