\begin{knitrout}
\definecolor{shadecolor}{rgb}{0.969, 0.969, 0.969}\color{fgcolor}\begin{kframe}
\begin{alltt}
\hlstd{mu.tilde0}\hlkwb{<-}\hlkwd{mean}\hlstd{(w0}\hlopt{*}\hlstd{Y)}
\hlstd{mu.tilde1}\hlkwb{<-}\hlkwd{mean}\hlstd{(w1}\hlopt{*}\hlstd{Y)}
\hlkwd{c}\hlstd{(mu.tilde0,mu.tilde1,mu.tilde1}\hlopt{-}\hlstd{mu.tilde0)}
\end{alltt}
\begin{verbatim}
+ [1]  4.578971  2.535878 -2.043093
\end{verbatim}
\end{kframe}
\end{knitrout}