\begin{equation} \label{eq:lm.eq:lm.model} \text{\lstinline[language=R]|lm.model <- lm(Total.Score ~ Game.Num, data = sid1133)|} \end{equation}