\begin{knitrout}
\definecolor{shadecolor}{rgb}{0.969, 0.969, 0.969}\color{fgcolor}\begin{kframe}
\begin{alltt}
\hlstd{mu0.0}\hlkwb{<-}\hlkwd{mean}\hlstd{(}\hlkwd{predict}\hlstd{(fit0,}\hlkwc{newdata}\hlstd{=}\hlkwd{data.frame}\hlstd{(X1,X2,}\hlkwc{Z}\hlstd{=}\hlnum{0}\hlstd{)))}
\hlstd{mu1.0}\hlkwb{<-}\hlkwd{mean}\hlstd{(}\hlkwd{predict}\hlstd{(fit0,}\hlkwc{newdata}\hlstd{=}\hlkwd{data.frame}\hlstd{(X1,X2,}\hlkwc{Z}\hlstd{=}\hlnum{1}\hlstd{)))}
\hlkwd{c}\hlstd{(mu0.0,mu1.0,mu1.0}\hlopt{-}\hlstd{mu0.0)}
\end{alltt}
\begin{verbatim}
+ [1]  4.454317  2.539963 -1.914354
\end{verbatim}
\end{kframe}
\end{knitrout}