sysuse nlsw88, clear
#delimit ;
graph dot (p10) p10=wage (p90) p90=wage, 
  over(occ, sort(2)) 
  legend(label(1 "10th percentile") label(2 "90th percentile"))
  title("10th and 90th percentiles of hourly wage", span)
  subtitle("Women aged 34-46, 1988" " ", span)
  note("Source:  1988 data from NLS, U.S. Dept. of Labor, Bureau of Labor Statistics", span) ;
#delimit cr