x <- rnorm(1000) mean(x) #蠏 median(x) #譴螳 var(x) #覿 sd(x) #譴ｸ谿 IQR(x) #覿覯 range(x) #覯 quantile(x) #覿 summary(x) #蠍一糾 scale(x) #譴-z螳(蠏=0, 譴ｸ谿=1)