>  x<-c(2,3,4,2,3,2,4,4,4,4)
>  hist(x)
