Как получить результат для условия в одной строке в r - PullRequest
1 голос
/ 02 марта 2020

У меня есть кусок кода, где я должен отфильтровать кадр данных на основе значения. Я прочитал набор данных со 100 строками данных.

baseData = fread(file = "./Data/ABC.csv", data.table = FALSE, stringsAsFactors = FALSE, showProgress = FALSE, encoding = "UTF-8")

После фильтрации

baseData = baseData %>% filter(., ab == 10)

Теперь я хочу проверить, правильно ли отфильтрованы данные. Итак, я написал условие,

ifelse((baseData$ab == 10),
       "ab has been filtered correctly",
       "ERROR")

, но я получил такой вывод,

[1] "ab has been filtered correctly" "ab has been filtered correctly" "ab has been filtered correctly"
[4] "ab has been filtered correctly" "ab has been filtered correctly" "ab has been filtered correctly"
[7] "ab has been filtered correctly" "ab has been filtered correctly" "ab has been filtered correctly"
[10] "ab has been filtered correctly" "ab has been filtered correctly" "ab has been filtered correctly"
.
.
.

Мне нужен такой вывод,

"ab has been filtered correctly"

По возможности вместе с количеством ошибок?

1 Ответ

2 голосов
/ 02 марта 2020

Помогла бы вся функция, вы можете использовать ее для создания вашего условного оператора.

if(all(baseData[,"ab"] == 10)){
  print("success")
}else{
  print("fail")
}
Добро пожаловать на сайт PullRequest, где вы можете задавать вопросы и получать ответы от других членов сообщества.
...