CHNIO包就是提供了**2002,2007,2012和2017年各省投入产出表的一个数据整理,数据源自各省统计局。2002年和2007年没有包含西藏数据。
你可以如下安装该包。
devtools::install_github('common2016/CHNIO')
查看2002年江苏省的数据。按当年生产者价格计算,单位万元。
library(CHNIO)
data("io2002")
io2002[['江苏']][1:5,1:6]
#> sec sec01 sec02 sec03 sec04 sec05
#> 1 sec01 5.661392e+06 29065.5216 816.22268 0.5222089 1.720672e+00
#> 2 sec02 5.656602e+03 3887.8633 14.97324 3558.7074485 2.540587e+02
#> 3 sec03 1.168790e+04 0.0000 97.12683 412.2319574 5.188396e+02
#> 4 sec04 2.827305e+00 0.0000 0.00000 1343.8335157 4.380162e-02
#> 5 sec05 2.641474e+03 319.3581 0.00000 101.2386258 5.661420e+04
你也可以看看原始数据长啥样。如下代码给出了北京的投入产出表的存储路径。
system.file('extdata','北京2002.xls', package = 'CHNIO')
#> [1] "/Users/yangnay/elements/RLibrary/CHNIO/extdata/北京2002.xls"
类别 | 部门名称 | 部门代码 |
---|---|---|
中间使用 | 农林牧渔业 | sec01 |
中间使用 | 煤炭开采和洗选业 | sec02 |
中间使用 | 石油和天然气开采业 | sec03 |
中间使用 | 金属矿采选业 | sec04 |
中间使用 | 非金属矿采选业 | sec05 |
中间使用 | 食品制造及烟草加工业 | sec06 |
中间使用 | 纺织业 | sec07 |
中间使用 | 服装皮革羽绒及其制品业 | sec08 |
中间使用 | 木材加工及家具制造业 | sec09 |
中间使用 | 造纸印刷及文教用品制造业 | sec10 |
中间使用 | 石油加工、炼焦及核燃料加工业 | sec11 |
中间使用 | 化学工业 | sec12 |
中间使用 | 非金属矿物制品业 | sec13 |
中间使用 | 金属冶炼及压延加工业 | sec14 |
中间使用 | 金属制品业 | sec15 |
中间使用 | 通用、专用设备制造业 | sec16 |
中间使用 | 交通运输设备制造业 | sec17 |
中间使用 | 电气、机械及器材制造业 | sec18 |
中间使用 | 通信设备、计算机及其他电子设备制造业 | sec19 |
中间使用 | 仪器仪表及文化办公用机械制造业 | sec20 |
中间使用 | 其他制造业 | sec21 |
中间使用 | 废品废料 | sec22 |
中间使用 | 电力、热力的生产和供应业 | sec23 |
中间使用 | 燃气生产和供应业 | sec24 |
中间使用 | 水的生产和供应业 | sec25 |
中间使用 | 建筑业 | sec26 |
中间使用 | 交通运输及仓储业 | sec27 |
中间使用 | 邮政业 | sec28 |
中间使用 | 信息传输、计算机服务和软件业 | sec29 |
中间使用 | 批发和零售贸易业 | sec30 |
中间使用 | 住宿和餐饮业 | sec31 |
中间使用 | 金融保险业 | sec32 |
中间使用 | 房地产业 | sec33 |
中间使用 | 租赁和商务服务业 | sec34 |
中间使用 | 旅游业 | sec35 |
中间使用 | 科学研究事业 | sec36 |
中间使用 | 综合技术服务业 | sec37 |
中间使用 | 其他社会服务业 | sec38 |
中间使用 | 教育事业 | sec39 |
中间使用 | 卫生、社会保障和社会福利业 | sec40 |
中间使用 | 文化、体育和娱乐业 | sec41 |
中间使用 | 公共管理和社会组织 | sec42 |
最终使用 | 农村居民消费 | FU101 |
最终使用 | 城镇居民消费 | FU102 |
最终使用 | 政府消费 | FU103 |
最终使用 | 固定资本形成总额 | FU201 |
最终使用 | 存货增加 | FU202 |
最终使用 | 净流出 | NOF |
- | 总产出 | GO |
与行在部门投入代码是一样的,增加值投入代码含义如下,
类别 | 部门名称 | 部门代码 |
---|---|---|
增加值 | 劳动者报酬 | VA001 |
增加值 | 生产税净额 | VA002 |
增加值 | 固定资产折旧 | VA003 |
增加值 | 营业盈余 | VA004 |
增加值 | 增加值合计 | TVA |
- | 总投入 | TI |
与2002年行代码相比,多了流出、流入和其他三个最终使用部门,
类别 | 部门名称 | 部门代码 |
---|---|---|
最终使用 | 流出 | FU302 |
最终使用 | 流入 | FU304 |
最终使用 | 其他 | ERR |
与2007年的行代码相比,对流出和流出进行了拆分,因此在最终使用部分,更加细分的代码为,
类别 | 部门名称 | 部门代码 |
---|---|---|
最终使用 | 出口 | EX |
最终使用 | 国内省外流出 | OF |
最终使用 | 进口 | IM |
最终使用 | 国内省外流入 | IF |
data("secnames")
head(secnames)
#> nm code year02 year07 year12 year17
#> X4 农林牧渔业 01 2002 2007 2012 2017
#> X5 煤炭开采和洗选业 02 2002 2007 2012 2017
#> X6 石油和天然气开采业 03 2002 2007 2012 2017
#> X7 金属矿采选业 04 2002 2007 2012 2017
#> X8 非金属矿采选业 05 2002 2007 2012 2017
#> X9 食品制造及烟草加工业 06 2002 2007 2012 2017
- 2007
- 最终使用 = 最终消费支出(FU101+FU102+FU103)+资本形成总额(FU201+FU202)+流出(FU302)
- 总产出 = 最终使用 - 流出(FU304)+其他(ERR)