powered by
freqtab
skew.freqtab(freqtab)
kurt.freqtab
var.freqtab
set.seed(2005) x <- round(rnorm(1000,100,10)) xscale <- 70:130 xtab <- freqtab(x,xscale) skew.freqtab(xtab)
Run the code above in your browser using DataLab