求助：R中如何将一个for循环的结果保存到一个数据框中？

34773

收藏 2014-05-22

这是我的代码
for (i in 1:dim(newid)[1]){
  family <- newid[i,]
  if ((family[1] < family[2]) | (family[1] < family[3])){
  show(family)
  }
}怎么将show(family)的结果保存到数据框中？多谢指教

扫码加我拉你入群

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

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

全部回复

bluesmoonlight

2014-5-23 17:14:34

我来试试

# add new column

newid$indicator<-FALSE

for (i in 1:dim(newid)[1]){

family <-newid[i,]

if ((family[1] <family[2]) | (family[1] < family[3])){

newid$indicator<- TRUE

}

id <- which(newid$indicator==TRUE)

newid[id,] ##isthis what you want?

你可以用nrow(newid)代替 dim(newid)[1]

扫码加我拉你入群

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

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

weixiaoyan

2016-12-29 17:12:07

啊我也想知道，怎么弄啊

扫码加我拉你入群

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

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

机械唯物主义123

2016-12-29 19:20:57

newdata=c()
for (i in 1:dim(newid)[1]){
  family <- newid[i,]
  if ((family[1] < family[2]) | (family[1] < family[3])){
  newdata=rbind(newdata,family)
  }
}
show(newdata)
#这个是否能满足你的要求？

扫码加我拉你入群

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

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

592shilu

2020-4-11 21:47:54

机械唯物主义123 发表于 2016-12-29 19:20
newdata=c()
for (i in 1:dim(newid)[1]){
family

感谢大神！！！！

扫码加我拉你入群

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

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

扫码加我 拉你入群

扫码加我 拉你入群

扫码加我 拉你入群

扫码加我 拉你入群

扫码加我 拉你入群

分享

扫码加好友，拉您进群

扫码加我拉你入群

扫码加我拉你入群

扫码加我拉你入群

扫码加我拉你入群

扫码加我拉你入群