# NOT RUN {
# Generate a data set consisting of 10 rows and 200 columns,
# where the values are randomly drawn from the integers 1, 2, and 3.
mat <- matrix(sample(3, 2000, TRUE), 10)
# For each pair of row, the value of the simple matching coefficient
# can be obtained by
smc(mat)
# and the distance based on the SMC by
smc(mat, dist = TRUE)
# }
Run the code above in your browser using DataLab