# NOT RUN {
## load example data set
data(X, envir = environment())
## create weight transformation limits vector
l <- seq(from = 0, to = 0.6, by = 0.02)
## test l.max
l.max <- test.l.max(X = X)
# }
Run the code above in your browser using DataLab