tests/ssupervised.R

library(Rmixmod)
data(iris)
data <- iris[, 1:4]
labels <- ifelse(iris[5] == "virginica", 3, ifelse(iris[5] == "versicolor", 2, 1))
rand <- sample(c(rep(1, each = 50), rep(0, each = 100)))
kl <- labels * rand
mixmodCluster(data, nbCluster = 3, knownLabels = kl)

Try the Rmixmod package in your browser

Any scripts or data that you put into this service are public.

Rmixmod documentation built on Sept. 25, 2023, 5:08 p.m.