require(wux)
data(cmip5_2050)
str(cmip5_2050)
summary(cmip5_2050)
tas.range <- c(0, 2.5)
pr.range <- c(-10, 15)
plot(cmip5_2050, "delta.air_temperature",
"perc.delta.precipitation_amount", boxplots = TRUE,
ylim = pr.range, xlim = tas.range, ylab = "Precipitation Amount [ xlab = "2-m Air Temperature [K]", draw.legend = TRUE,
draw.median.lines = FALSE, subreg.subset = "CORDEX.Africa",
main = "CMIP5 2-m Air Temp. and Precip. Amount 1961-1990 to 2021-2050",
label.only.these.models = "", draw.seperate.legend = TRUE,
copyright = TRUE, horiz.box.col = "coral", vert.box.col = "cyan")
Run the code above in your browser using DataLab