\begin{Schunk}
\begin{Sinput}
 x <- seq(-2, 12, by = 0.1)
 y <- exp(x) 
 plot(y ~ x, xlab = expression(paste(X*beta)), ylab = expression(exp(X*beta)), type = "l")
\end{Sinput}
\end{Schunk}
\begin{Schunk}
\begin{Sinput}
 curve(exp(x), from = -5, to = 10, type = "l")
\end{Sinput}
\end{Schunk}
