# (1) create the initial design:
X = t(replicate(1000, runif(2, -10, 10)))
feat.object = createFeatureObject(X = X,
fun = function(x) sum(x^2),
lower = -10, upper = 10, blocks = 10)
# (2) find the nearest prototypes of all cells:
findNearestPrototype(feat.object)Run the code above in your browser using DataLab