求教：如何用stata编程来计算资本存量啊？

是 否 +2 论坛币

k人 参与回答

经管之家送您一份

应届毕业生专属福利!

求职就业群

赵安豆老师微信：zhaoandou666

经管之家联合CDA

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

立即领取

感谢您参与论坛问题回答

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

+2 论坛币

求教：如何用stata编程来计算资本存量啊？
学艺不精，只会用excel手工处理，但数据太多，太累人了。恳请高手点拨！先谢谢啦！
以下数据各列的含义分别为：i 是地区标识，t 是年份，I 是当年价的固定资产投资完成额，P 是以2000年为基期的固定资产投资价格指数，K0 为基年（2000）资本存量，K是待求的以2000年不变价计的资本存量。
资本存量的计算公式参考了张军等（2004）的做法：Kit＝Kit-1（1－r）＋Iit（其中折旧率r＝9.6％）

     i           t         I             P       K0            K
Anlu     2000   9.07   100.00     10
Anlu     2001   10.36  100.10
Anlu     2002   11.45   99.90
Anlu     2003   12.63  103.19
Anlu     2004   14.56  109.37
Anlu     2005   16.92  111.80
Anlu     2006   19.46  113.82
Anlu     2007   25.81  118.48
Badong    2000   5.61   100.00     8
Badong    2001   4.70   100.10
Badong    2002   6.51    99.90
Badong    2003   6.62   103.19
Badong    2004   7.14   109.37
Badong    2005   7.55   111.80
Badong    2006   8.05   113.82
Badong    2007   10.74  118.48
Baokang   2000   2.90   100.00     5
Baokang   2001   3.05   100.10
Baokang   2002   3.69    99.90
Baokang   2003   4.15   103.19
Baokang   2004   6.15   109.37
Baokang   2005   8.36   111.80
Baokang   2006   9.32   113.82
Baokang   2007   10.07  118.48
Changyan  2000   4.67   100.00     7
Changyan  2001   4.32   100.10
Changyan  2002   3.94    99.90
Changyan  2003   4.96   103.19
Changyan  2004   7.40   109.37
Changyan  2005   8.36   111.80
Changyan  2006   9.69   113.82
Changyan  2007   11.58  118.48

扫码加我 拉你入群

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

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

分享0 收藏12 回帖

关键词：stata编程 Stata 资本存量 tata 如何用 编程 资本存量

*设数据库结构如上，但没有K变量。
g K=K0
bys i: replace K=0.904*K[_n-1]+I*P[1]/P if _n>1

*下面与上面等价，K都是2000年不变价资本存量
g K=K0
bys i: replace K=0.904*K[_n-1]+100*I/P if _n>1

*补充一句，为了避免原始数据未必排序，最好先使用一次sort i t。

衷心感谢sungmoo版主，这么快就帮忙解决了问题！

呵呵，这个命令不错，可以省去很多excel操作

先收藏下～

sungmoo 发表于 2009-8-15 14:28
*下面与上面等价，K都是2000年不变价资本存量
g K=K0
bys i: replace K=0.904*K[_n-1]+100*I/P if _n>1

是不是应该：
bysort i: replace K=0.904*K[_n-1]+I[1]*P/100 if _n>1
这个价格指数是以2000年为基期的。
希望你在看看，交流一下，我这个对不对！

是不是应该：
bysort i: replace K=0.904*K[_n-1]+I[1]*P/100 if _n>1
这个价格指数是以2000年为基期的。
希望你在看看，交流一下，我这个对不对！

O(∩_∩)O谢谢各位！

@浪花朵朵开 发表于 2015-10-26 11:52
是不是应该：
bysort i: replace K=0.904*K[_n-1]+I[1]*P/100 if _n>1
这个价格指数是以2000年为基期的。 ...

您这个版本可能有问题，请考虑一下固定资产投资价格指数，它的值实际上是同一年份的名义值与实际值之比。