Function to replace NaN values.

[Nic-Chr]

Simple function to replace NaN values, similarly named to tidyr::replace_na().

replace_nan <- function(x, value){
  x[is.nan(x)] <- value
  x
}