#create a toy LHD with 5 rows and 3 columns
toy=rLHD(n=5,k=3);toy
#Choose the first column of toy and exchange two randomly selected elements.
try.col=exchange(X=toy,j=1,type="col")
toy;try.col
#Choose the first row of toy and exchange two randomly selected elements.
try.row=exchange(X=toy,j=1,type="row")
toy;try.row
Run the code above in your browser using DataLab