if (FALSE) {
if(interactive()){
## ................................................
## GENERATION OF A MATRIX OF 100 OBSERVATIONS AND 10 VARIABLES
x <- matrix(rnorm(1000),ncol=10)
## STATISTICS
res <- moreStats(x, quantile=0.05, show=TRUE)
res
}
}
Run the code above in your browser using DataLab