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