# a vector
x <- c(1, 2, NA, 3, NaN, 4, NA, 5, Inf, -Inf, 6, 7)
replace_nan_inf(x)
# a data frame
df <- data.frame(
x = c(1, NA, 5, Inf, 2, NA),
y = c(3, NaN, 4, -Inf, 6, 7),
stringsAsFactors = FALSE
)
replace_nan_inf(df)
Run the code above in your browser using DataLab