Skip to main content
1 de 2
Caro
  • 807
  • 2
  • 10
  • 24

Cómo renumero categorías usando condicionales?

Tengo el siguiente dataframe:

df1 <- data.frame(RAM = c("1", "2", "3", "4", "5", "6","7","8","9","10","11","12","13"), freq = c("1", "4", "16", "3", "5", "3","1","8","5","21","8","4","35"), ID = c("0","0", "3","0","0","0","0","0","0","10","0","0","13")

Como pueden ver, ID es = 0 cuando freq <10, de lo contrario ID=RAM

Y quiero tener esto

df1 <- data.frame(RAM = c("1", "2", "3", "4", "5", "6","7","8","9","10","11","12","13"), freq = c("1", "4", "16", "3", "5", "3","1","8","5","21","8","4","35"), ID = c("0","0", "3","0","0","0","0","0","0","10","0","0","13"), RAM2 = c("3","3","3","10","10","10","10","10","10","10","13","13","13")

Para esto, he intentado hacerlo usando

df2 <- df1 %>% mutate(RAM2=ifelse(ID!=0, ID, c(ID[(ID!=0)])))

Pero lo que obtengo a penas se parece a lo que necesito:

df2 <- data.frame(RAM = c("1", "2", "3", "4", "5", "6","7","8","9","10","11","12","13"), freq = c("1", "4", "16", "3", "5", "3","1","8","5","21","8","4","35"), ID = c("0","0", "3","0","0","0","0","0","0","10","0","0","13"), RAM2 = c("3","10","3","3","10","13","3","10","13","10","10","13","13")

Por lo que veo, c(ID[(ID!=0)] acumula todos los valores que no son 0 (3, 10 y 13 en este caso) y luego los va poniendo en ese orden en aquellos casos donde ID =0, sin cumplir la condición que quisiera, básicamente porque no sé como programarla. Debería decirle de algún modo que ponga 3 en RAM2 hasta que se encuentre con 3, 10 hasta que se encuentre con 10 y 13 hasta que encuentre 13. Cómo lo hago?

Caro
  • 807
  • 2
  • 10
  • 24