\frametitle{Exponential regression in R}
Previous model not implemented in R function {\tt glm}.\\
Work around: use a Gamma distribution and twist the results.
\begin{verbatim}
## fits a glm under the more general assumption
## of a Gamma distribution
glm.res <- glm(formula= (y~ x),
               family=(Gamma(link=log)))
## extract some results from model fit now under
## the assumption that the distribution was exponential
summary(glm.res,dispersion=1)

\end{verbatim}