fun with math. stat in R