sysuse citytemp, clear 
#delimit ;
graph hbar tempjan, over(division) over(region) nofill
  ytitle("Degrees Fahrenheit")
  title("Average January temperature")
  subtitle("by region and division of the United States")
  note("Source:  U.S. Census Bureau, U.S. Dept. of Commerce") ;
#delimit cr