在R中分配数字列表二进制类

Question

我试图根据以下参数将数字列表转换为二进制类：

如果该值大于3那么 0

如果值为3或小于3那么 1

目前我已将以下if else命令放在一起。但这是一个错误。

if (df$DaysOverdue[df$daysoverdue == ">3"]) {
df$DaysOverdue[df$DaysOverdue] <- 0 
}
else {
df$DaysOverdue[df$DaysOverdue] <- 1 
}

Answer 1

这是使用tidyverse的简单解决方案：

library(tidyverse)
df %>%
  mutate(`Overdue <= 3 Days` = as.numeric(DaysOverdue <= 3))

Answer 2

应该这么简单：

df$DaysOverdueBin[df$DaysOverdue > 3] <- 0
df$DaysOverdueBin[df$DaysOverdue <= 3] <- 1