如何将R语言中除法产生的NA/NaN替换为0？

直接给你几种实用的解决方案，适合新手操作：

方法1：计算时直接判断处理 #

在创建新列的同时，提前判断分子分母均为0的情况，直接赋值0，避免产生NA/NaN：

india$ruppi.per.hourwork <- ifelse(india$Family_Labour__Rs__ == 0 & india$Family_Labour__Hrs__ == 0, 
                                   0, 
                                   india$Family_Labour__Rs__/india$Family_Labour__Hrs__)

方法2：先计算再替换异常值 #

如果已经执行了原代码生成了带NA/NaN的列，可以用下面的代码批量替换：

# 先执行你的原计算代码
india$ruppi.per.hourwork <- india$Family_Labour__Rs__/india$Family_Labour__Hrs__
# 把所有NA和NaN替换为0
india$ruppi.per.hourwork[is.na(india$ruppi.per.hourwork) | is.nan(india$ruppi.per.hourwork)] <- 0

注：is.na()能识别NA，is.nan()能识别NaN，用|（或）同时覆盖两种异常情况。

方法3：用dplyr包的简洁写法（适合后续数据处理） #

如果你以后会用到dplyr这类数据处理包，可以用case_when做更清晰的条件判断：

library(dplyr)
india <- india %>%
  mutate(ruppi.per.hourwork = case_when(
    Family_Labour__Rs__ == 0 & Family_Labour__Hrs__ == 0 ~ 0,
    TRUE ~ Family_Labour__Rs__/Family_Labour__Hrs__
  ))

内容的提问来源于stack exchange，提问作者RAZ ITZHAK