Ifelse с несколькими условиями в функции Саппи - PullRequest
1 голос
/ 26 июня 2019

Мне нужно проверить каждую строку в двух столбцах на наличие двух условий в кадре данных (в основном я вычитаю каждую строку в одной паре столбцов из каждой строки в другой паре столбцов, чтобы получить два определенных значения (одно из которыхинтервал времени), см. код).Ожидаемый результат - еще один столбец с 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) 

1 Ответ

2 голосов
/ 26 июня 2019

Предполагая, что trades1 является data.frame`, нам может понадобиться

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

Убедитесь, что скобки difftime закрыты

...