x<-c(25,30,12,18,39,47,5,40,80,75)
mean(x)
median(x)
quantile(x,0.25)
quantile(x,0.5)
quantile(x,0.75)