#
# Written by:
# -- 
# John L. Weatherwax                2009-04-21
# 
# email: wax@alum.mit.edu
# 
# Please send comments and especially bug reports to the
# above email address.
# 
#-----

library(DAAG)
attach(possum)

fossum = totlngth[ sex=="f" ]

mean(fossum)
median(fossum)
mean(fossum,trim=0.1)

stem( fossum )

plot( density( fossum ), main="" )

detach(possum)