\begin{Schunk}
\begin{Sinput}
 hist(nes2002$V023010, prob=T, xlab = "Bush Feeling Thermometer", breaks = seq(0, 100, by = 5), main="")
\end{Sinput}
\end{Schunk}
