\begin{knitrout}
\definecolor{shadecolor}{rgb}{0.969, 0.969, 0.969}\color{fgcolor}\begin{kframe}
\begin{alltt}
\hlstd{m0}\hlkwb{<-}\hlkwd{sum}\hlstd{((}\hlnum{1}\hlopt{-}\hlstd{Z)}\hlopt{*}\hlkwd{predict}\hlstd{(fit0))}\hlopt{/}\hlkwd{sum}\hlstd{(}\hlnum{1}\hlopt{-}\hlstd{Z)}
\hlstd{m1}\hlkwb{<-}\hlkwd{sum}\hlstd{(Z}\hlopt{*}\hlkwd{predict}\hlstd{(fit0))}\hlopt{/}\hlkwd{sum}\hlstd{(Z)}
\hlkwd{c}\hlstd{(m0,m1,m1}\hlopt{-}\hlstd{m0)}
\end{alltt}
\begin{verbatim}
+ [1]  4.288448  2.770900 -1.517548
\end{verbatim}
\end{kframe}
\end{knitrout}