将NA替换为0，并将所有其他值/文本替换为1

Question

airquality

    Ozone Solar.R Wind Temp Month Day
1      41     190  7.4   67     5   1
2      36     118  8.0   72     5   2
3      12     149 12.6   74     5   3
4      18     313 11.5   62     5   4
5      NA      NA 14.3   56     5   5
6      28      NA 14.9   66     5   6
7      23     299  8.6   65     5   7
8      19      99 13.8   59     5   8
9       8      19 20.1   61     5   9

你好，

如何将Ozone中的值替换为二进制？如果NA为0，则为1。

谢谢 高

Answer 1

假设您的数据帧称为airquality

airquality$Ozone <- ifelse(is.na(airquality$Ozone), 0, 1) 

Answer 2

airquality$Ozone <- as.integer(!is.na(airquality$Ozone))

Answer 3

或者

airquality$Ozone[!is.na(airquality$Ozone)] <- 1L
airquality$Ozone[is.na(airquality$Ozone)] <- 0L