# NOT RUN {
# 40 data for versicolor in the iris dataset
iris_versicolor <- iris[61:100, -5]
unit_space_MT <- MT(unit_space_data = iris_versicolor,
includes_transformed_data = TRUE)
# The following tol is a parameter passed to solve function.
unit_space_MT <- MT(unit_space_data = iris_versicolor,
includes_transformed_data = TRUE,
tol = 1e-9)
(unit_space_MT$distance)
# }
Run the code above in your browser using DataLab