## Not run:
# iris2 <- iris
# iris2$Species <- NULL
#
# library(kmeans.ddR)
#
# X <- as.darray(data.matrix(iris2))
#
# mykm <- dkmeans(X,centers=3)
#
# newdata <- matrix(c(5,4,3,5,7,1,0,8),2,4)
# labels <- predict(mykm,newdata)
# ## End(Not run)
Run the code above in your browser using DataLab