[Stata]地图绘制（一）：中国地图与世界地图

您所在的位置：网站首页 › 世界经纬度分布与相应的国家 › [Stata]地图绘制（一）：中国地图与世界地图

[Stata]地图绘制（一）：中国地图与世界地图

2024-07-12 13:56| 来源: 网络整理| 查看: 265

相似文件

换一批是否 +2 论坛币

k人参与回答经管之家送您一份

应届毕业生专属福利!

求职就业群

赵安豆老师微信：zhaoandou666 经管之家联合CDA

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

立即领取感谢您参与论坛问题回答

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

+2 论坛币

中国地图与世界地图的绘制

世界地图

注：（该部分主要参考中南财经政法大学Stata协会讲座，在此向中南财经政法大学Stata协会致敬感谢）ssc install wbopendta //世界银行数据 ssc install spmap // 制图命令复制代码然后输入命令db wbopendata打开下载数据的向导

2015-7-4 19:37:02 上传下载附件 (40.99 KB)

将数据画在地图上，首先，将研究数据和地图数据绑在一起 *准备地图数据use "http://fmwww.bc.edu/repec/bocode/w/world-c.dta",clear save world-c use "http://fmwww.bc.edu/repec/bocode/w/world-d.dta",clear save world-d复制代码

2015-7-4 19:39:27 上传下载附件 (75.55 KB)

*拼接数据，绘制地图merge 1:1 countrycode using world-d.dta,keepusing(_ID) rename _ID id spmap ny_gdp_pcap_kd using world-c,id(id) fcolor(Heat)复制代码

2015-7-4 19:44:38 上传下载附件 (14.91 KB)

2015-7-4 19:45:28 上传下载附件 (20.62 KB)

*最为简洁的命令

worldstat world,stat(GDP) year(2012) cname复制代码

2015-7-4 19:47:31 上传下载附件 (29.52 KB)

*中国地图的绘制（该部分参考连玉君老师讲义，感谢连老师）

findit china map use china_label,clear tab name replace name = subinstr(name, "省", "", .) replace name = subinstr(name, "市", "", .) replace name = subinstr(name, "回族自治区", "", .) replace name = subinstr(name, "壮族自治区", "", .) replace name = subinstr(name, "特别行政区", "", .) replace name = subinstr(name, "自治区", "", .) replace name = subinstr(name, "维吾尔", "", .) tab name gen x = uniform() format x %9.3g spmap x using "china_map.dta", id(id) /// label(label(name) /// xcoord(x_coord) ycoord(y_coord) size(*.9)) /// plotregion(icolor(stone)) graphregion(icolor(stone)) /// clnumber(8) fc(Greens2) oc(white ..) osize(medthin ..) 复制代码

2015-7-4 19:49:50 上传下载附件 (39.56 KB)

2015-7-4 19:51:05 上传下载附件 (29.94 KB)

“一个酒鬼眼中的中国地图”* Dr. Chuntao Li（中南财经政法大学）绘图讲义

use china_label ,clear replace name="北大荒" if name=="黑龙江省" replace name="马奶酒" if name=="内蒙古自治区" replace name="葡萄美酒" if name=="新疆维吾尔自治区" replace name="宝丰" if name=="河南省" replace name="大泉源酒" if name=="吉林省" replace name="道光廿五酒" if name=="辽宁省" replace name="古河州" if name=="甘肃省" replace name="老白干" if name=="河北省" replace name="二锅头" if name=="北京市" replace name="汾酒" if name=="山西省" replace name="青稞酒" if name=="青海省" replace name="西凤酒" if name=="陕西省" replace name="老银川" if name=="宁夏回族自治区" replace name="青稞酒" if name=="西藏自治区" replace name="青岛啤酒" if name=="山东省" replace name="洋河" if name=="江苏省" replace name="古井" if name=="安徽省" replace name="五粮液" if name=="四川省" replace name="劲酒" if name=="湖北省" replace name="" if name=="上海市" replace name="江津" if name=="重庆市" replace name="花雕" if name=="浙江省" replace name="四特" if name=="江西省" replace name="酒鬼" if name=="湖南省" replace name="云南白" if name=="云南省" replace name="茅台" if name=="贵州省" replace name="刘三姐" if name=="广西壮族自治区" replace name="珠江" if name=="广东省" replace name="椰岛" if name=="海南省" replace name="金门高粱" if name=="台湾省" replace name="津酒" if name=="天津市" replace name="干红" if name=="香港特别行政区" replace name="金门高粱" if name=="福建省" format y %9.3g spmap y using "china_map.dta", /// id(id)title("用Stata13.1绘制的酒鬼眼中的中国地图", size(*0.8)) label(label(name) /// xcoord(x_coord) ycoord(y_coord) size(*.76))fcolor(Oranges) legenda(off)复制代码

2015-10-12 19:47:07 上传下载附件 (26.42 KB)

//命令安装 ssc install spgrid ssc install spkde ssc install spmap //数据集 net get spkde, from(http://fmwww.bc.edu/RePEc/bocode/s) net get spmap, from(http://fmwww.bc.edu/RePEc/bocode/s) net get spgrid, from(http://fmwww.bc.edu/RePEc/bocode/s) //修改变量值单位 use "italy-outlinecoordinates",clear replace _X=_X/1000 replace _Y=_Y/1000 save,replace //略去(kilometers) spgrid using "italy-outlinecoordinates", /// resolution(w10) /// cells("GridCells.dta") /// points("GridPoints.dta") /// replace compress dots use "Italy-DataPoints.dta", clear spkde dcvd95 pop95 using "GridPoints.dta", /// xcoord(xcoord) ycoord(ycoord) /// bandwidth(fbw) fbw(100) dots /// saving("Kde.dta", replace)复制代码

2015-10-15 20:55:24 上传下载附件 (18.03 KB)

扫码加我拉你入群

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

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

分享0 收藏202 回帖关键词：Stata 中国地图世界地图 tata 中国地中国地图世界地图

【本文地址】

[Stata]地图绘制（一）：中国地图与世界地图

[Stata]地图绘制（一）：中国地图与世界地图

今日新闻

推荐新闻