sysuse census, clear
gen drate = divorce / pop18p 
label var drate "Divorce rate"
scatter drate medage [w=pop18p] if state!="Nevada", msymbol(Oh) ///
  note("State data excluding Nevada" ///
       "Area of symbol proportional to state's population aged 18+")