sysuse citytemp, clear 
#delimit ;
graph bar tempjuly tempjan, over(region) bargap(-30)
  legend( label(1 "July") label(2 "January") )
  ytitle("Degrees Fahrenheit")
  title("Average July and January temperatures")
  subtitle("by regions of the United States")
  note("Source:  U.S. Census Bureau, U.S. Dept. of Commerce") ;
#delimit cr