# NOT RUN {
########################################################################
#Example 1: Projection of the temperature increase for a given year.
########################################################################
date <- 2050
temp <- get_RCP8.5(date)
temp
########################################################################
#Example 2: Projection of the temperature increase for a vector of years.
########################################################################
date <- seq(2005,2100,1/12)
temp <- get_RCP8.5(date)
plot(date,temp,type="l")
# }
Run the code above in your browser using DataLab