Me parece que tienes una confusión en como se trabaja en R, cuando haces esto:
if(i==0) {datos$Cod_Saldo<-3}
Imagino que estás suponiendo que se actualiza Cod_Saldo
de la fila correspondiente a la iteración, pero no es así, esta sentencia actualiza todos los valores de Cod_Saldo
en el data.frame
. Además tienes un problema de lógica, las condiciones se superponen al ser independientes: if(i==0)
y if(i<1)
Para hacer lo que buscas debes modificar algo el código:
for(i in 1:nrow(datos)) {
if (datos$Cod_Saldo[i] == 0) {
datos$Cod_Saldo[i] <- 3
} else if (datos$Cod_Saldo[i] < 1) {
datos$Cod_Saldo[i] <- 1
} else if (datos$Cod_Saldo[i] > 1) {
datos$Cod_Saldo[i] <-2
}
}
Estamos iterando por el índice de fila para poder modificar directamente el valor en cada fila y hemos anidado las condiciones para que no se "pisen".
Ahora bien, en R el enfoque iterativo en la mayoría de los casos no tiene ningún sentido, por que existen las funciones "vetoriales""vectoriales" como el ifelse()
, que permite anidar condiciones. EestoEsto hace lo mismo de una forma más compacta y legible:
datos$Cod_Saldo <- ifelse(datos$saldo == 0, 3,
ifelse(datos$saldo > 0, 2, 1))