sysuse auto, clear
collapse (mean) mpgmean=mpg (sd) mpgsd=mpg, by(rep78)
scatter mpgsd mpgmean

sysuse auto, clear
collapse (mean) pricemean=price (sd) pricesd=price, by(rep78)
scatter pricesd pricemean

sysuse auto, clear
graph bar, over(rep78) over(foreign)
tabulate rep78 foreign, /*row col*/ cell
graph bar, over(foreign) over(rep78)

graph bar, over(rep78) asyvars stack title("asyvars") over(foreign)

sysuse auto, clear
preserve
contract rep78 foreign, freq(count) nomiss
egen coltot = total(count), by(foreign)
generate pct = count/coltot
label var pct  "Percent rep78 within foreign"
graph hbar (asis) pct, over(rep78) over(foreign)
graph hbar (asis) pct, over(rep78) asyvars stack over(foreign)
restore

*sysuse auto, clear
preserve
contract rep78 foreign, freq(count) nomiss
egen coltot = total(count), by(rep78)
generate pct = count/coltot
label var pct  "Percent foreign within rep78"
graph hbar (asis) pct, over(foreign) asyvars stack over(rep78)
restore