【版块活动】一月一包主题讨论

是 否 +2 论坛币

k人 参与回答

经管之家送您一份

应届毕业生专属福利!

求职就业群

赵安豆老师微信：zhaoandou666

经管之家联合CDA

送您一个全额奖学金名额~ !

立即领取

感谢您参与论坛问题回答

经管之家送您两个论坛币！

+2 论坛币

本月主题：地图主题包

提议人：jmpamao

讨论框架：包括但不限于以下几个方面(欢迎补充)
(1)R中地图的绘制方法(空间数据可视化)，包括利用R本身的作图功能实现或是利用接口实现等
(2)空间数据的建模与分析，包括数据的读取、操作、处理等，有实例则更佳

参与方法(以跟帖形式)：
(1)分享资料
(2)分享使用和学习心得
(3)直接参与讨论(也欢迎提问)

奖励方法
(1)将有价值的回帖设为精彩回复或直接编辑到主题帖中，供坛友学习
(2)只要是具有学习价值或者讨论价值的回帖，基于论坛币的奖励
(3)请不要进行无意义的回帖，诸如顶、学习一下等，表达支持可以通过给回帖评分的形式
(4)对参与活动特别热心且有突出贡献的坛友可推荐为本版热心会员或后备版主

温馨提示
(1)分享资料包括好的书籍、博文以及之前论坛的精彩回帖等，考虑到R的更新速度，请在分享前确认资料的有效性。
(2)鼓励免费分享，不建议收取论坛币，对于好的资料会有丰厚的论坛币补偿。
(3)R毕竟只是一个工具，在分享使用经验欢迎附上使用过程中的背景知识。
(4)建议对于回帖正文，除了部分难以翻译的英文关键词，请不要使用英文。

感谢jmpamao对活动的倡议和努力，欢迎大家提出更多好的意见建议。

扫码加我 拉你入群

请注明：姓名-公司-职位

以便审核进群资格，未注明则拒绝

分享0 收藏3 回帖

关键词：版块活动 数据可视化 分享资料 空间数据 精彩回复 主题

先抛砖引玉一下

推荐几篇不错的博文
(1)关于R for map的一个系列：
http://site.douban.com/182577/widget/notes/10568279/note/257898418/
有代码有图有说明，值得一读，不过部分代码已经过时，但在看了帮助文档之后很容易知道怎么改过来，并且内容基本上已经可以满足一般的可视化需求了

(2)COS上的几篇老文(不止这些)
http://cos.name/2009/07/drawing-china-map-using-r/
http://cos.name/2013/01/drawing-map-in-r-era/
http://cos.name/2013/06/weibo-fans-map-visualization/

(3)这篇是介绍ggmap的，介绍的很仔细且易懂
http://www.maenchi.com/?p=199

另外这是我前几天看到的一篇文章，这个蛮不错的，反正也有例子，有兴趣的朋友可以去玩玩
http://blog.revolutionanalytics.com/2014/04/animated-choropleths-in-r.html

大家接着分享和补充吧~奖励多多哈~

我能先顶一下么？

以上整理就这些吧？   欢迎添加
maps   #很基础
mapdata  maptools   #利用已知数据
ggplot2
ggmap  mapproj     #借助谷歌，有限制。不过挺好用
rMaps  #借助软件

不错
很好

画中国地图应包括钓鱼岛、台湾、南海等！

建议最后由jmpamao大神整理并通过实例展示！

maps 包中 num.polygons 代码怎么看？

求证1加1 发表于 2014-4-14 15:59
先抛砖引玉一下

推荐几篇不错的博文

哇，非常不错
版主，有没有看到在地图中画柱形图的？就是现在有多个国家或者地区，
然后根据某个指标，把相应的柱形图标注上去，来直观比较大小。

dxystata 发表于 2014-4-14 21:32
画中国地图应包括钓鱼岛、台湾、南海等！

1. require("maps")
   
2. require("mapproj")
   
3. require("mapdata")
   
4. ###################################################################
   
5. ####因为第一次搞地图，不清楚map() 后面黑箱中， 数据是什么格式的，于是尝试看数据结构
   
6. map("china",fill=F,plot=T,interior=T)
   
7. ch=map("china")
   
8. fix(ch)
   
9. ###fix 后明白,structure(list(x=c(..),y=c(...),range=c(..),name=..),.name=c("x","y","range","name"),class="map")
   
10. ###大体上只要知道 x经度， y 维度， 就可以画国或者省的边界图
    
11. ###################################################################
    
12. 
    
13. ######可以把map("china") 画的图关掉， 自己用得到的数据画，加深理解，以解决其他情况##########
    
14. chi <-source("china.r")#fix(ch) 后生成的文件 保持为 china.r,可以改.txt，打开，为了了解数据结构
    
15. str(chi)
    
16. str(chi$value)
    
17. 
    
18. map(chi$value,fill=F,plot=T,interior=T,myborder = 0.001) #中国边界图 画出来了。只要手头上有数据就ok~
    
19. #这个数据缺少四川和重庆的边界坐标，有的话，如何添加？， 钓鱼岛， 可以添加一个点，放在x, y 分别第一位（东经123，北纬25），但不是闭环的一个点，为线段，大家可以试试! 怎么解决呢？
    
20. points(mapproject(123,25),col="red")#钓鱼岛的坐标
    
21. ###也看看着这   plot(chi$value)
    
22. 
    
23. 
    
24. 
    
25. 
    
26. ###怎么给这个省份的省会城市，进行标注呢
    
27. ###中国地理位置_经纬度.doc是从百度文库下的文件， 是 省会和地级市的 坐标（没有南海，与钓鱼岛，要添加）
    
28. ###进行整理后，留下省会城市， 再自己估计个南海的坐标
    
29. 
    
30. chinacity=read.table("chinacity.txt",sep=" ",header=T,stringsAsFactors=F)
    
31. chinacity=chinacity[,-5]
    
32. colnames(chinacity)<-c("province","city","y","x")
    
33. 
    
34. y=as.numeric(unlist(strsplit(chinacity$y,split="北纬"))[c(F,T)])
    
35. x=as.numeric(unlist(strsplit(chinacity$x,split="东经"))[c(F,T)])
    
36. city=chinacity$city
    
37. china.city=list(x=x,y=y)
    
38. 
    
39. #mapproj 查看其例子， state.add, state.name, state.x77..数据结构，看后会有收获
    
40. text(mapproject(china.city),city,cex=0.68)
    
41. 
    
42. 
    
43. ###附件 为 中国地理位置_经纬度.doc及 稍微整理后的省会城市 坐标
    
44. 
    
45. 
    
46. ###初步学习画地图，要得到大家帮助与指正。
    
47. ###顺便问下下载中国的坐标，哪里可以下载？
    
48. ### 在china.r数据中， 想把 钓鱼岛 数据放进去，structure(list(x=123, y= 25..), 变为线段，而非一个点，怎么解决？？？
    
49. ###现在只能折中 用points..来表示

复制代码

中国地图.rar (53.8 KB) 本附件包括：

• 中国地理位置_经纬度.doc
• china.r

2014-4-15 21:08:37 上传