> hist(cfb$AGE) # symmetric > wilcox.test(cfb$AGE, conf.int=TRUE) ... 95 percent confidence interval: 48 50 ...The INCOME variable is skewed. We do a log-transform first.
> hist(log(cfb$INCOME +1)) > wilcox.test((log(cfb$INCOME +1)), conf.int=TRUE) ... 95 percent confidence interval: 10.49 10.61 ... > exp(c(10.49,10.61)) - 1 [1] 35953 40537