clear all freduse GDP GDPC1 rename GDPC1 rgdp tsmktim time, start(1947q1) tsset time tsline GDP graph rename gdp tsline rgdp graph rename rgdp tsline GDP rgdp graph rename gdp2 generate ln_rgdp=ln(rgdp) tsline ln_rgdp graph rename ln_rgdp tsline d.rgdp graph rename drgdp tsline d.ln_rgdp graph rename dlrgdp clear * U.S. Unemployment Rates freduse LNS14000036 LNS14000037 LNS14000038 rename LNS14000036 ur rename LNS14000037 urmen rename LNS14000038 urwomen tsmktim time, start(1948m1) tsset time tsline ur graph rename ur tsline urmen urwomen, lpattern (dash solid) legend(ring(0) pos(2) label(1 "men") label(2 "women")) graph rename ur2 histogram urmen graph rename hurmen histogram urwomen graph rename hurwomen kdensity urmen graph rename kurmen kdensity urwomen graph rename kurwomen scatter urmen urwomen graph rename urscatter * Wisconsin Unemployment Rate clear freduse WIUR rename WIUR urwisc tsmktim time, start(1976m1) tsset time tsline urwisc graph rename urwisc