Comment remplacer les valeurs NA par des zéros dans un cadre de données R ?

Question

J'ai un cadre de données et certaines colonnes ont NA valeurs.

Comment puis-je remplacer ces NA des valeurs avec des zéros ?

Answer 1

Voir mon commentaire dans la réponse de @gsk3. Un exemple simple :

> m <- matrix(sample(c(NA, 1:10), 100, replace = TRUE), 10)
> d <- as.data.frame(m)
   V1 V2 V3 V4 V5 V6 V7 V8 V9 V10
1   4  3 NA  3  7  6  6 10  6   5
2   9  8  9  5 10 NA  2  1  7   2
3   1  1  6  3  6 NA  1  4  1   6
4  NA  4 NA  7 10  2 NA  4  1   8
5   1  2  4 NA  2  6  2  6  7   4
6  NA  3 NA NA 10  2  1 10  8   4
7   4  4  9 10  9  8  9  4 10  NA
8   5  8  3  2  1  4  5  9  4   7
9   3  9 10  1  9  9 10  5  3   3
10  4  2  2  5 NA  9  7  2  5   5

> d[is.na(d)] <- 0

> d
   V1 V2 V3 V4 V5 V6 V7 V8 V9 V10
1   4  3  0  3  7  6  6 10  6   5
2   9  8  9  5 10  0  2  1  7   2
3   1  1  6  3  6  0  1  4  1   6
4   0  4  0  7 10  2  0  4  1   8
5   1  2  4  0  2  6  2  6  7   4
6   0  3  0  0 10  2  1 10  8   4
7   4  4  9 10  9  8  9  4 10   0
8   5  8  3  2  1  4  5  9  4   7
9   3  9 10  1  9  9 10  5  3   3
10  4  2  2  5  0  9  7  2  5   5

Il n'est pas nécessaire de postuler apply . =)

EDIT

Vous devriez également jeter un coup d'œil à norm paquet. Il possède de nombreuses fonctionnalités intéressantes pour l'analyse des données manquantes. =)

Answer 2

Pour un seul vecteur :

x <- c(1,2,NA,4,5)
x[is.na(x)] <- 0

Pour un data.frame, créez une fonction à partir de ce qui précède, puis apply dans les colonnes.

Veuillez fournir un exemple reproductible la prochaine fois, comme indiqué ici :

Comment faire un excellent exemple reproductible en R ?

Answer 3

Exemple de dplyr :

library(dplyr)

df1 <- df1 %>%
    mutate(myCol1 = if_else(is.na(myCol1), 0, myCol1))

Note : Cela fonctionne par colonne sélectionnée, si nous avons besoin de le faire pour toutes les colonnes, voir @reidjax Réponse de l'entreprise en utilisant muté_chaque .

Answer 4

Si nous essayons de remplacer NA lors de l'exportation, par exemple lors de l'écriture vers csv, alors nous pouvons utiliser :

  write.csv(data, "data.csv", na = "0")

Answer 5

Vous pouvez utiliser replace()

Par exemple :

> x <- c(-1,0,1,0,NA,0,1,1)
> x1 <- replace(x,5,1)
> x1
[1] -1  0  1  0  1  0  1  1

> x1 <- replace(x,5,mean(x,na.rm=T))
> x1
[1] -1.00  0.00  1.00  0.00  0.29  0.00 1.00  1.00