#dibujar los dos graficos conjuntamente
library("gridExtra")
grid.arrange(g3, # First row with one plot spaning over 2 columns
arrangeGrob(g1,g2, ncol = 2), # Second row with 2 plots in 2 different columns
nrow = 2)
## Warning: Removed 24 row(s) containing missing values (geom_path).
## Removed 24 row(s) containing missing values (geom_path).
## Warning: Removed 25 row(s) containing missing values (geom_path).
## Removed 25 row(s) containing missing values (geom_path).
## Removed 25 row(s) containing missing values (geom_path).