Ejecuta tu codigo R online

 

La aplicacion https://rdrr.io permite ejecutar casi cualquier codigo en lenguaje R de forma online. Esto es posible gracias a los mas de 19 mil paquetes pre-instalados. Por ejemplo, simulemos un hidrograma triangular aplicando la formula racional para una cuenca de 0.1 km², con un coeficiente de escorrentia de 0.8 y con un evento de lluvia de intensidad de 10 mm/hr con una duracion equivalente al tiempo de concentracion de 0.4 horas.

Copia y pega las siguientes lineas de codigo en el espacio superior y dale click a "Run"

# Simulando un hidrograma triangular

library(ggplot2)

A <- 0.1  # ingresar el area en km²

i <- 10   # ingresar la intensidad de lluvia en mm/hr

c <- 0.8  # ingresar el coeficiente de escorrentia

Tc <- 0.4 # ingresar el tiempo de concentracion en horas

Qmax <- c*i*A/3.6

Qt <- c(0, Qmax, 0)

t <- c(0, Tc, 2*Tc)

data <- data.frame(t,Qt)

ggplot(data=data, aes(x=t, y=Qt)) + geom_line(color="blue",size=3) + ggtitle(paste("Caudal max =", round(Qmax,2), "m3/s","\n","Volumen =", Tc*Qmax*60*60,"m3")) + xlab("Horas") + ylab("Caudal (m3/s)") 

El resultado sera el hidrograma, los valores del caudal maximo y el volumen en el titulo de la figura. Esta aplicacion permite una libre edicion.