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?