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 apenas 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?