1、简述
国内生产总值(英语:Gross Domestic Product,缩写:GDP)是一个国家的宏观经济指标,有别与国民生产总值。想要比较不同国家(或经济体)的GDP,需要汇率换算,但由于方式不同,所以结果也会存有差异。但也不致于引起比较上的错误,比如,无论你按什么方式计算,老挝的GDP也不会超过美国。
2、如何获取数据
2.1、啰嗦
作为概率统计专业的学生,要想提升自己的专业技能,就需要获取各种各样的真实数据用以统计分析实践。从中不仅能熟练数学软件的操作,还可以在实践中学到课程中涉及不到的知识。比如,数理整理技巧,处理缺失数据,合理性检验,发现统计分析中易犯的错误等。
2.2、免费数据源(本段会继续更新)
国内外都有大量的免费数据源,下面列出几个我常去的数据源网站,您也可以通过留言或评论的方式加以补充。
★ 国内(有些网站仅是部分资源免费):
☆ 中国知网,部分数据资源免费
☆ 中华人民共和国国家统计局, 合并了以前的中国统计年鉴,免费
☆ 人地系统主题数据库,提供地理信息系统(GIS)数据,一般是成品,数据比较粗糙,免费
☆ 数据堂,免费资源不多
★ 国外:
☆ 联合国数据库(UNdata),数据很丰富,免费
☆ DIVA-GIS,可以下载行政区GIS数据,免费
☆ Global Administrative Areas,可以下载行政GIS数据,可精确到县,提供多种数据格式,免费
★ Mathematica 9
最牛的数学软件之一(实际上,现阶段可以把之一去掉),通过内部函数可直接获取各种实时数据和历史数据(比如,天气数据,国家和城市的人口、经济、地理、语言等,天文数据,金融数据……),非常给力,不仅是统计专业朋友的法宝!在所有的大型数学软件中,她的帮助做得最出色,她的官网提供大量免费教程和源文件,用她写程序最贴近数学专业的思维和习惯,可以用你能想到的最美好的词形容,不信给你看个数学软件对比表>>。
3、用Mathematica汇总各国GDP
3.1、Mathematica代码:
GDPData = CountryData[#, {"GDP", 2004}] & /@ CountryData[];(*获取各个国家GDP数据*) PopuData = CountryData[#, {"Population", 2004}] & /@ CountryData[];(*获取各个国家人口数据*) CNData = CountryData[];(*获取各个国家名称数据*) GDPDataMP = Position[GDPData, Missing["NotAvailable"]] // Flatten;(*查找缺失GDP数据位置*) PopuDataMP = Position[PopuData, Missing["NotAvailable"]] // Flatten;(*查找缺失人口数据位置*) GDPData[[Union[GDPDataMP, PopuDataMP]]] = "无数据";(*将缺失数据用"无数据"替代*) PopuData[[Union[GDPDataMP, PopuDataMP]]] = "无数据";(*将缺失数据用"无数据"替代*) mybgcolor = RGBColor[231/255, 231/255, 231/255];(*背景颜色*) mycolor = ColorData["TemperatureMap"];(*配色方案*) ig = Graphics[{EdgeForm[{Thickness[0.000000001], mybgcolor}], If[GDPData[[#]] == "无数据", Black, mycolor[(GDPData[[#]]/PopuData[[#]])/35000]], Tooltip[CountryData[CNData[[#]], "FullPolygon"], Row[{CNData2[[#]], ": ", "人均GDP=", If[GDPData[[#]] == "无数据", "无数据", GDPData[[#]]/PopuData[[#]]], "$", " ", "GDP=", GDPData[[#]], "$"}]]} & /@ Range[Length[GDPData]], Background -> mybgcolor, ImageSize -> 1200](*绘图*)
3.2、输出结果及动态演示
★ 按区域划分,各国GDP分布图,请点击图片查看大图:
☆ 如果您已经安装了Mathematica,请点此查看动态演示CDF文件>>
☆ 如果您没有安装Mathematica,请点此查看类似的网页版的动态演示(效果稍差些)>>
☆ 点此下载此CDF文件>>。
3.3、2004年各国GDP与人均GPD排名(共207个经济体)
★ GPD排名前30的国家人均GDP图,请点击图片查看大图:
朋友们,不要为我们的GDP如何之高而骄傲,因为它的高度还远远不够。周总理的话——“为中华之崛起而读书!”,它永不过时。在这个时候,很多愤青们往往会找他们指责和埋怨的对象,大发感慨。唉,其中很多言论误人误已。让我不深不浅地体会到了袁腾飞对此的观点……
朋友们,拿出愤青的精神,奋斗吧,为已为人!
一份近期的报道:
尽管中国GDP超过日本成为“世界第二”,但与全球第一的美国仍相差甚远。中国的人均GDP为3800美元,“在全球排在105位左右”。事实上,除了人均指标在世界排名靠后,中国在医疗、教育以及环境等较多领域仍比较落后。
★ GPD排名前30的国家人均GDP表,点此下载2004年207个经济体GDP全部数据>>
2004年世界各国GDP排名
|
|||||
国家 | Country | GDP排名 | GDP/$ | 人均GDP排名 | 人均GDP |
美国 | United States | 1 | 1.16E+13 | 13 | 39689.71 |
日本 | Japan | 2 | 4.61E+12 | 18 | 36157.83 |
德国 | Germany | 3 | 2.75E+12 | 22 | 33322.52 |
联合王国 | United Kingdom | 4 | 2.20E+12 | 17 | 36661.88 |
法国 | France | 5 | 2.06E+12 | 23 | 33011.71 |
中国 | China | 6 | 1.94E+12 | 129 | 1511.74 |
意大利 | Italy | 7 | 1.73E+12 | 27 | 29641.52 |
西班牙 | Spain | 8 | 1.04E+12 | 32 | 24580.26 |
加拿大 | Canada | 9 | 9.92E+11 | 25 | 31027.33 |
墨西哥 | Mexico | 10 | 7.58E+11 | 67 | 7273.10 |
韩国 | South Korea | 11 | 7.22E+11 | 48 | 15242.36 |
印度 | India | 12 | 6.95E+11 | 164 | 624.26 |
巴西 | Brazil | 13 | 6.64E+11 | 93 | 3609.92 |
澳大利亚 | Australia | 14 | 6.60E+11 | 24 | 32757.40 |
荷兰 | Netherlands | 15 | 6.10E+11 | 16 | 37552.15 |
俄国 | Russia | 16 | 5.92E+11 | 88 | 4112.69 |
土耳其 | Turkey | 17 | 3.92E+11 | 74 | 5582.28 |
瑞士 | Switzerland | 18 | 3.63E+11 | 5 | 49097.69 |
比利时 | Belgium | 19 | 3.60E+11 | 21 | 34704.60 |
瑞典 | Sweden | 20 | 3.57E+11 | 14 | 39606.79 |
奥地利 | Austria | 21 | 2.89E+11 | 20 | 35307.91 |
挪威 | Norway | 22 | 2.59E+11 | 4 | 56220.87 |
印尼 | Indonesia | 23 | 2.57E+11 | 135 | 1186.62 |
波兰 | Poland | 24 | 2.53E+11 | 69 | 6610.19 |
沙特阿拉伯 | Saudi Arabia | 25 | 2.50E+11 | 53 | 10856.36 |
丹麦 | Denmark | 26 | 2.45E+11 | 8 | 45299.54 |
希腊 | Greece | 27 | 2.31E+11 | 41 | 20898.59 |
南非 | South Africa | 28 | 2.16E+11 | 82 | 4549.81 |
芬兰 | Finland | 29 | 1.89E+11 | 19 | 36139.44 |
爱尔兰 | Ireland | 30 | 1.85E+11 | 9 | 45079.51 |