![]() |
Fig. Hidrograma urbano en formato gif animado |
La animación de hidrogramas y la oportunidad de ver la secuencia de la variación de caudales en función del tiempo, es una buena herramienta de visualización y de difusión de resultados. A continuación un código simple en lenguaje R que elabora la figura mostrada. El hidrograma mostrado es el resultado de un analisis hidrologico de un paso a desnivel o "bypass" en la ciudad de Lima, el cual estaré comentando en próximas entradas.
Codigo en R:
library(ggplot2)
library(gganimate)
library(gifski)
data <- read.table("... colocar la ruta y archivo texto con cabeceras Hours y Discharge", header=T)
myplot <- ggplot(data=data, aes(x=Hours, y=Discharge)) +
geom_line(color = "blue" ,size=2) +
ggtitle("Hidrograma en zona urbana") +
xlab("Horas") +
ylab("Caudal (lt/s)") +
transition_reveal(Hours)
animate(myplot, duration = 10, fps = 10, renderer = gifski_renderer())
anim_save("... colocar la ruta para guardar la salida output.gif")
No hay comentarios. :
Publicar un comentario