# Create a new variable with the mean and median
df_titanic_replace <- df_titanic %>%
  mutate(replace_mean_age  = ifelse(is.na(age), average_missing[1], age),
        
         replace_mean_fare = ifelse(is.na(fare), average_missing[2], fare))

Retour à l'accueil