27.14 Diagrama de Líneas

Importar la base de datos con la tasa de cambio.

trm <- read_csv("https://www.datos.gov.co/api/views/mcec-87by/rows.csv?accessType=DOWNLOAD")
names(trm) %<>% tolower()

Asegurarse que la tasa de cambio sea entendida como una fecha:

trm <- trm %>% 
  mutate(hasta = lubridate::dmy(vigenciahasta))
trm %<>% select(-unidad)
class(trm$hasta)
## [1] "Date"

Usar geom_line para realizar un diagrama de líneas del valor de la TRM durante el tiempo.

ggplot(data = trm, mapping = aes(x = hasta, y = valor)) + 
  geom_line(color = "purple") 

Una alternativa, sería hacerlo con geom_area:

ggplot(data = trm, mapping = aes(x = hasta, y = valor)) + 
  geom_area(fill = "steelblue")