# NOT RUN {
set.seed(12345)
## Data from gamma distribution ##
X = matrix(rgamma(50*4,shape = 2),50)
mvnTest(X, B=100)
## load the ubiquitous multivariate iris data ##
## (first 50 observations of columns 1:4) ##
iris.df = iris[1:50, 1:4]
mvnTest(iris.df, B=100)
# }
Run the code above in your browser using DataLab