# \donttest{
original_data <- data.frame("1"=c(1, 2, 1), "2"=c(5,6,7),
"3"=c(4, 5, 8), "4"=c(3, 1, 9))
standard_matrix <- createStandardMatrix(data = original_data)
dist_matrix <- createDistMatrix(standard_matrix = standard_matrix)
# }
Run the code above in your browser using DataLab