Necesito cambiar los NA
de un data frame con los últimos valores que dicha variable toma en el tiempo.
Es un base de participación de empresas en distintas zonas, ordenadas por fecha. Por lo tanto las variables son las siguientes:
fecha <- c("2009-01-01", "2009-01-01", "2009-02-01", "2009-02-01", "2017-08-01", "2017-08-01", "2017-09-01", "2017-09-01")
empresa <- c("A", "B", NA, NA, "C", "D", NA, NA )
area <- c("zona 1", "zona 1", "zona 1", "zona 1", "zona 2", "zona 2", "zona 2", "zona 2" )
participacion <- c(0.5, 0.5, NA, NA, 0.5, 0.5, NA, NA)
DF <- data.frame(fecha, empresa, area, participacion)
fecha empresa area participacion
1 2009-01-01 A zona 1 0.5
2 2009-01-01 B zona 1 0.5
3 2009-02-01 <NA> zona 1 NA
4 2009-02-01 <NA> zona 1 NA
5 2017-08-01 C zona 2 0.5
6 2017-08-01 D zona 2 0.5
7 2017-09-01 <NA> zona 2 NA
8 2017-09-01 <NA> zona 2 NA
Necesitaría reemplazar los valores NA de "empresa" y "participacion" por los últimos valores que fueron tomando en el tiempo. Por ejemplo, para febrero de 2009 necesito que las empresas de la zona 1 sean nuevamente A y B (con su respectiva participación); lo mismo con los NA de la zona 2: necesito que sean C y D septiembre de 2017.
Es decir, debería llegar al siguiente resultado:
fecha empresa area participacion
1 2009-01-01 A zona 1 0.5
2 2009-01-01 B zona 1 0.5
3 2009-02-01 A zona 1 NA
4 2009-02-01 B zona 1 NA
5 2017-08-01 C zona 2 0.5
6 2017-08-01 D zona 2 0.5
7 2017-09-01 C zona 2 NA
8 2017-09-01 D zona 2 NA
Cómo podría resolverlo?
Desde ya muchas gracias