calcul variable en fonction de la valeur des autres

Bonjour,
Existe-t-il un moyen simple de calculer (ou modifier) une variable en fonction du contenu des autres variables ?
Je souhaiterais faire quelque chose qui ressemblerait à ceci :

Code:

---

1 2 3 4

library(dplyr) test<-data.frame(x=c(1,2,3),y=c(10,20,30)) test <- test %>% mutate_if(x==1,y=7)

---

mais ce code ne fonctionne pas.
Le mutate_if ne fonctionne, apparemment, qu'avec des conditions (du genre "is_numeric") sur une variable existante qu'on souhaiterait modifier.
Merci

Si vous cherchez à modifier la valeur des individus, je suppose que c'est plutôt ce code que vous cherchez :

Code:

---

1 2 3 4

library(dplyr) test<-data.frame(x=c(1,2,3), y=c(10,20,30)) test <- test %>% mutate(y = if_else(x == 1, 7, y))

---

Et si vous souhaitez ré-encoder plusieurs valeurs:

Code:

---

1 2 3 4 5 6 7 8

library(dplyr) test<-data.frame(x=c(1,2,3), y=c(10,20,30)) test <- test %>% mutate(y = case_when( x == 1 ~ 7, x == 2 ~ 12, TRUE ~ y) )

---

Et si vous souhaitez ré-encoder encore plus de variables, je vous recommande plutôt de créer une nouvelle table de conversion et de faire une jointure entre la table originale et la table de conversion

Code:

---

1 2 3 4

library(dplyr) test<-data.frame(x=c(1,2,3),y=c(10,20,30)) test <- test %>% mutate(y=ifelse(x==1,7,y))

---

Citation:

---

Envoyé par statnmap

Si vous cherchez à modifier la valeur des individus, je suppose que c'est plutôt ce code que vous cherchez :

Code:

---

1 2 3 4

library(dplyr) test<-data.frame(x=c(1,2,3), y=c(10,20,30)) test <- test %>% mutate(y = if_else(x == 1, 7, y))

---

Et si vous souhaitez ré-encoder plusieurs valeurs:

Code:

---

1 2 3 4 5 6 7 8

library(dplyr) test<-data.frame(x=c(1,2,3), y=c(10,20,30)) test <- test %>% mutate(y = case_when( x == 1 ~ 7, x == 2 ~ 12, TRUE ~ y) )

---

Et si vous souhaitez ré-encoder encore plus de variables, je vous recommande plutôt de créer une nouvelle table de conversion et de faire une jointure entre la table originale et la table de conversion

---

Merci !:)