Méthode plus efficace de recodage d'une colonne dans un data.frame conditionnelle à d'autres entrées de colonne

Question

Je cherche une méthode plus efficace de recodage des entrées de colonne dans une trame de données, où le recodage est conditionnel aux entrées des autres colonnes. Prenez cet exemple simple, qui illustre ma procédure actuelle de création d'une nouvelle colonne pour les données recodées, la conversion en caractère, puis en utilisant les crochets du sous-ensemble pour recoder les données (existe-t-il un nom officiel pour cette procédure?).

## example data frame 
df = data.frame(id = seq(1 , 100 , by=1) , 
       x = rep(c("W", "Z") , each=50), 
       y = c(rep(c("A","B","C","D") , 25))) 

# add a new column based on column y; convert to character 
df$newY = as.character(df$y) 

# change newY entries to numbers based on conditions in other columns 
df$newY[ df$x == "W" & df$newY == "B" ] <- 1 
df$newY[ df$x == "Z" & df$newY == "D" ] <- 3 

Cette procédure est très bien pour les variables recodage avec un petit nombre de conditions, mais devient encombrant pour plus grand nombre d'arguments conditionnels ou quand il y a beaucoup de variables distinctes recoder.

Quelqu'un pourrait-il m'aider à trouver une méthode plus efficace?

Merci!

Answer 1

Quelques approches de ce:

df <- data.frame(id = seq(1 , 100 , by=1) , 
       x = rep(c("W", "Z") , each=50), 
       y = c(rep(c("A","B","C","D") , 25))) 

# Take the product (my preference) 
as.numeric(df$x) * as.numeric(df$y) 

# Create new factor based on x and y and convert to numeric 
as.numeric(as.factor(paste0(df$x, df$y)))