\begin{knitrout}
\definecolor{shadecolor}{rgb}{0.969, 0.969, 0.969}\color{fgcolor}\begin{kframe}
\begin{alltt}
\hlstd{fmod}\hlkwb{<-}\hlkwd{formula}\hlstd{(BPSysAve}\hlopt{~}\hlstd{SmokeNow}\hlopt{+}\hlstd{Gender}\hlopt{+}\hlstd{Age}\hlopt{+}\hlstd{Race3}\hlopt{+}\hlstd{Education}\hlopt{+}\hlstd{MaritalStatus}\hlopt{+}\hlstd{HHIncome}\hlopt{+}\hlstd{Poverty)}
\hlkwd{coef}\hlstd{(}\hlkwd{lm}\hlstd{(fmod,}\hlkwc{data}\hlstd{=small.nhanes))[}\hlnum{2}\hlstd{]}
\end{alltt}
\begin{verbatim}
+  SmokeNow 
+ -1.097768
\end{verbatim}
\end{kframe}
\end{knitrout}