Estoy intentando crear un vector de fechas para, digamos, el período del 1 de enero de 2018 al 31 de octubre de 2019 empleando base R. Lo que se me ocurre es primero crear ese vector utilizando las funciones seq
y as.Date
de la siguiente forma:
fecha <- data.frame(fecha=seq(from = as.Date("2018-01-01", format="%Y-%m-%d"),
to = as.Date("2019-10-31", format="%Y-%m-%d"), by = 1))
Lo que nos regresa lo siguiente:
str(fecha)
## $ fecha: Date, format: "2018-01-01" "2018-01-02"
Ahora bien, comúnmente nosotros empleamos el formato día - mes - año, y, para tener ese formato, empleamos la función format
.
fecha[,"fecha"] <- format(fecha[,"fecha"], "%d-%m-%Y")
str(fecha)
'data.frame': 669 obs. of 1 variable:
$ fecha: chr "01-01-2018" "02-01-2018" "03-01-2018" "04-01-2018" ...
El formato es el deseado pero las fechas ahora son de tipo caracter. Si intento coercionar empleando otra vez as.Date
vuelvo prácticamente al principio:
fecha[,"fecha"] <- as.Date(fecha[,"fecha"], format="%d-%m-%Y")
str(fecha)
'data.frame': 669 obs. of 1 variable:
$ fecha: Date, format: "2018-01-01" "2018-01-02" ...
¿Alguna solución a este problema? Me interesa tener una en base R y agradecería cualquier solución adicional (entiendo que las librerías zoo
y lubridate
permiten trabajar con fechas aunque honestamente desconozco sus funciones principales)
Gracias de antemano por cualquier orientación