应用函数中具有多个条件的Ifelse

Question

我需要检查数据帧中两个条件的两列中的每一行(基本上，我将一对列中的每行与另一对列中的每行相减，以获得两个确定值(其中一个是时间间隔，请参见代码)。如果两个条件都满足，则预期的结果是另一列为1，否则为0。

我试过了：

sapply(trades1, function(x) x$indicator3 <- x %>% ifelse(indicator2 - indicator == -1 & difftime(date2, date, units = "min"== 1), 1, 0))

这给了我

 Error in ifelse(., indicator2 - indicator == -1 & difftime(date2, date,  : 
  unused argument (0) 

Answer 1

假设trades1是一个data.frame`，我们可能需要

with(x, as.integer(((indicator2 - indicator) == -1) & 
     (difftime(date2, date, units = "min")== 1)))

确保difftime大括号已关闭