全部版块 我的主页
论坛 数据科学与人工智能 数据分析与数据科学 R语言论坛
1679 4
2009-05-25

x<-c(1,2,2,1,2,1,2,1,1)
x<-as.matrix(x)
x1<-x[x[,1]==1,]
x2<-x[x[,1]==2,]

我想用循环来实现上述步骤,类似于下面的:
“for(i in 1:2)
{
s<-x[x[,1]==i,]
}
错误于s <- x[x[, 1] == i, ] : 找不到对象's'。”
请问我该怎么实现这个循环?如果定义S,该怎样定义?

各位大虾帮帮忙!先谢过了

二维码

扫码加我 拉你入群

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

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

全部回复
2009-5-27 16:35:00

不完全正確的解法:

x<-c(1,2,2,1,2,1,2,1,1)

s<-data.frame(NULL)

for(i in 1:2){
  for(j in c(1:sum(x==i)))
    s[i,j]<-i
}
s

二维码

扫码加我 拉你入群

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

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

2015-6-27 15:46:25
你这个只要先给s赋空值就行了,s<-c();
但是你这个代码实在是有点不效率,不漂亮。
x1<-x[which(x==1)]
x2<-x[which(x==2)]
二维码

扫码加我 拉你入群

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

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

2015-6-27 19:02:08
提示: 作者被禁止或删除 内容自动屏蔽
二维码

扫码加我 拉你入群

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

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

2015-6-28 09:49:23
ryoeng 发表于 2015-6-27 19:02
更短、更简洁。
恩恩 你的这个更简洁
二维码

扫码加我 拉你入群

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

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

相关推荐
栏目导航
热门文章
推荐文章

分享

扫码加好友,拉您进群
各岗位、行业、专业交流群