# NOT RUN {
#create a toy LHD with 5 rows and 3 columns
toy=rLHD(n=5,k=3);toy
#Calculate the phi_p criterion of toy (with default q and p=50)
phi_p(X=toy,p=50)
#Calculate the phi_p criterion of toy (with q=2 and and p=50)
phi_p(X=toy,p=50,q=2)
# }
Run the code above in your browser using DataLab