# NOT RUN {
# Generate random data.
set.seed(10)
mOne <- as.matrix(data.frame(
x = rnorm(10),
y = rbinom(10, 100, 0.5),
z = runif(10)
))
mTwo <- as.matrix(data.frame(
x = rnorm(20),
y = rbinom(20, 100, 0.5),
z = runif(20)
))
# Find the minimum distance between each point in mOne and the points in
# mTwo.
find_min_dists(mOne, mTwo)
# }
Run the code above in your browser using DataLab