根据省份年份进行循环计算的问题

是 否 +2 论坛币

k人 参与回答

经管之家送您一份

应届毕业生专属福利!

求职就业群

赵安豆老师微信：zhaoandou666

经管之家联合CDA

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

立即领取

感谢您参与论坛问题回答

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

+2 论坛币

假设需要求各省各年收入（y）的基尼系数（function已知），可以用什么循环的命令呢，一般循环似乎都是对于次数，有什么命令可以根据省份和年份进行循环呢？

非常感谢！

   prov       yr          hh            y
      a       1995         1            30
      a       1995         2            55
      a        1995        3            65
      a        2000        1            77
      a        2000        2            87
      a        2000        3            41
      b        2000        1            65
      b        2000        2            70
      b        2000        3            43
...

P.S. 这个问题之前发过如何切割，现已明白如何根据省份和年份切割了，如省a,2000年，命令如下：

Data=read.csv("try.csv")
subdata=subset(Data,Data[,2]=="2000" & Data[,1]=="a",select=c(prov,yr,hh,y))
subdata

扫码加我 拉你入群

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

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

分享0 收藏0 回帖

关键词：function Select Subset Elect Data function 基尼系数 年收入 切割 如何

aggregate函数，tapply函数，dplyr函数都可以做，不需要循环，循环效率太低

1. attach(Data)
   
2. tapply(y,list(prov,yr),function)

复制代码

水天一色DIY 发表于 2014-7-3 18:02
aggregate函数，tapply函数，dplyr函数都可以做，不需要循环，循环效率太低

很好用！！谢谢！！！

水天一色DIY 发表于 2014-7-3 18:02
aggregate函数，tapply函数，dplyr函数都可以做，不需要循环，循环效率太低

再次请教一下。我的function里有两个结果，所以在function里面我最后return了一个向量（包含两个结果）。再运行以下命令。

Data=read.csv("try.csv")
attach(Data)
result=tapply(y,list(prov,yr),DER)
result

得出的结果是：

> result
  1995      2000     
a Numeric,2 Numeric,2
b NULL      Numeric,2

请问您知道如何显示出来么？

非常感谢！

水天一色DIY 发表于 2014-7-3 18:02
aggregate函数，tapply函数，dplyr函数都可以做，不需要循环，循环效率太低

不分开写成两个function是因为计算过程中有核密度估计，分成两个方程等于算两次核密度估计。

winniewang2222 发表于 2014-7-4 09:36
很好用！！谢谢！！！

抱歉问了个傻问题，存下来就出来了。
write.csv(result,"output.csv")

^_^

水天一色DIY 发表于 2014-7-3 18:02
aggregate函数，tapply函数，dplyr函数都可以做，不需要循环，循环效率太低

抱歉问了个傻问题，存下来就出来了。
write.csv(result,"output.csv")

^_^

winniewang2222 发表于 2014-7-4 17:45
抱歉问了个傻问题，存下来就出来了。
write.csv(result,"output.csv")

恩，如果你想全return出来，可以用list()

水天一色DIY 发表于 2014-7-4 18:14
恩，如果你想全return出来，可以用list()

多谢！
list(result[,])