powered by
getLabels(model, data)
temp <- classicEM(irisdata, 4) temp2 <- getLabels(temp, irisdata)
Run the code above in your browser using DataLab