# NOT RUN {
# Plot the response surface as a function of snow PDD factor, and ice
# PDD factor at year 2500 (time index 661), while keeping other parameters
# at mid-range values
data(emul.Sicopolis)
# }
# NOT RUN {
rsurface.plot(emul=emul.Sicopolis, parind=c(4,5), parvals=c(3, 10, 50, NA, NA),
tind=661, n1=5, n2=5)
# }
Run the code above in your browser using DataLab