\begin{Schunk}
\begin{Sinput}
 library(rockchalk)
 plotSlopes(mod1, plotx = "elevation", interval = "confidence", xlab = "Elevation above sea level", ylab = "Annual Average Temperature (Celsius)", main="")
\end{Sinput}
\end{Schunk}
