如何在一個條件內循環數據框？

Question

我有一個data.frame（df）其中包含兩列（時間，結果）。我試圖根據時間在數據框內循環，並檢查Result的值以執行某些條件。換句話說，我想從頭開始查看df，直到df $ time值變爲60.對於每次迭代，如果大於100，我需要檢查df $ Result。但是，我通過使用子集來完成此操作，但是，我想知道如何以不同的方式做到這一點。例如嵌套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循環，因爲它會在整個範圍內。 .. 有什麼建議麼？

Answer 1

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

會做的伎倆什麼。

Answer 2

這應該給你的行數的計數，我認爲這是你要加起來爲x

dim(df[time < 60 & Result > 100,])[1]