X <- matrix(stats::rnorm(2000), ncol = 2)
chull(X)
## Not run: ------------------------------------
#   # Example usage from graphics package
#   plot(X, cex = 0.5)
#   hpts <- chull(X)
#   hpts <- c(hpts, hpts[1])
#   lines(X[hpts, ])
## ---------------------------------------------
Run the code above in your browser using DataLab