\renewcommand{\betweenticks}{50}
\bardiagrambegin{9.5}{200}{2cm}{1}{2}{1cm}{0.01cm}
    \drawlevellines
    \baritem{1998}{120}{green}
    \baritem{1999}{123}{red}
    \baritem{2000}{147}{yellow}
    \baritem{2001}{176}{green}
    \baritem{2002}{132}{red}  
\bardiagramend{{\large Year}}{{\large Income}}