1

我有一个包含两列（时间、结果）的 data.frame（df）。我正在尝试根据时间在数据框内循环并检查 Result 的值以执行某些条件。换句话说，我想从头开始遍历 df，直到 df$time 值变为 60。对于每次迭代，我需要检查 df$Result 是否大于 100。但是，我已经通过使用子集来完成此操作，我想知道如何以不同的方式做到这一点..例如嵌套的 For 循环。

我创建了一个 MWE 来说明这个问题；

 time<-seq(1,100,0.1)
 Result<-seq(1,991,1)
 df<-data.frame(time,Result)
 # I want to loop inside the df until the df$time=60
 # for each iteration I want to check the df$Result  if it's >100.

这是我尝试在嵌套中做到这一点：

 Df_time<-df$time
 Df_result<-df$Result
 x<-0

 for(i in Df_time){

     if(i > 60.0){

       for(i in Df_result){
          if(i >100){
            x<-x+1
           }
        }   


     }

  }

   cat("Total is ",x,"\n")

这似乎不对..我认为这与内部 for 循环有关，因为它将跨越整个范围...有什么建议吗？

4

2 回答 2

2 
sum(df$time > 60 & df$Result > 100)

会成功的。

于 2013-10-22T17:49:55.770 回答
2

这应该给你行数的计数，我认为这就是你想要加起来的x

 dim(df[time < 60 & Result > 100,])[1]
于 2013-10-22T17:25:58.653 回答