楼主: fxcfinal
1932 7

[问答] 大神帮忙看看程序 [推广有奖]

  • 0关注
  • 0粉丝

大专生

90%

还不是VIP/贵宾

-

威望
0
论坛币
0 个
通用积分
0
学术水平
0 点
热心指数
1 点
信用等级
0 点
经验
786 点
帖子
38
精华
0
在线时间
59 小时
注册时间
2014-10-14
最后登录
2016-5-4

楼主
fxcfinal 发表于 2014-10-22 13:40:33 |AI写论文

+2 论坛币
k人 参与回答

经管之家送您一份

应届毕业生专属福利!

求职就业群
赵安豆老师微信:zhaoandou666

经管之家联合CDA

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

感谢您参与论坛问题回答

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

+2 论坛币
setwd("C:\\Users\\fxc\\Desktop")
Revenue <- read.table("2014.txt", header = TRUE)
Revenue$Stkcd <- factor(Revenue$Stkcd)
AllFirms <- unique(Revenue$Stkcd)
Firm.1 <-Revenue[Revenue$Stkcd == "1",]
Rev <- Firm.1[1:60,]
for (i in AllFirms){
  Firm.i <-Revenue[Revenue$Stkcd == "i",]
  Revenue.i <- Firm.i[1:60,]
  Rev <- cbind(Rev, Revenue.i)
}
为什么最后REV里面都是NA?

二维码

扫码加我 拉你入群

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

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

关键词:Revenue Desktop Venue Users Even Desktop factor Users 程序

沙发
meishanjia1900 发表于 2014-10-22 14:03:02 来自手机
fxcfinal 发表于 2014-10-22 13:40
setwd(&quot;C:\Users\fxc\Desktop&quot;)
Revenue
确定是cbind么?换rbind可以么?

藤椅
fxcfinal 发表于 2014-10-22 14:06:57
meishanjia1900 发表于 2014-10-22 14:03
确定是cbind么?换rbind可以么?
还是不行

板凳
meishanjia1900 发表于 2014-10-22 14:10:10 来自手机
fxcfinal 发表于 2014-10-22 13:40
setwd(&quot;C:\Users\fxc\Desktop&quot;)
Revenue
同名数据框列合并我没试过,建议每次合并前将要并入数据的名称换一下。还有,factor应该是数字型,将"1"换成1试一下。

报纸
meishanjia1900 发表于 2014-10-22 14:25:28 来自手机
meishanjia1900 发表于 2014-10-22 14:10
同名数据框列合并我没试过,建议每次合并前将要并入数据的名称换一下。还有,factor应该是数字型,将&quot;1&quot;换 ...
重新表述:数据框列合并时,列名最好别重复。每次合并前最好改一下列名。

地板
fxcfinal 发表于 2014-10-22 16:09:07 来自手机
meishanjia1900 发表于 2014-10-22 14:25
重新表述:数据框列合并时,列名最好别重复。每次合并前最好改一下列名。
你如果我想把它们放到同一列中呢,是不是用rbind?

7
linandle 发表于 2014-10-22 18:57:46
循环中的Revenue$Stkcd == "i"不对,R只会把它识别成固定的字符"i"。改成 i,试试。

8
fxcfinal 发表于 2014-10-22 23:49:38
linandle 发表于 2014-10-22 18:57
循环中的Revenue$Stkcd == "i"不对,R只会把它识别成固定的字符"i"。改成 i,试试。
已经改好了,谢谢。

您需要登录后才可以回帖 登录 | 我要注册

本版微信群
加好友,备注cda
拉您进交流群
GMT+8, 2025-12-26 05:36