R语言使用K-Means

最新推荐文章于 2023-05-10 16:18:13 发布

亓了个葩

最新推荐文章于 2023-05-10 16:18:13 发布

阅读量6.5k

点赞数 1

分类专栏：无监督学习文章标签： R语言算法机器学习 kmeans 无监督学习

本文链接：https://blog.csdn.net/skyonefly/article/details/50235871

版权

无监督学习专栏收录该内容

4 篇文章 0 订阅

订阅专栏

R语言有自己封装的K-Means函数，可以直接调用

kmeans(x, centers, iter.max = 10, nstart = 1,
algorithm = c("Hartigan-Wong", "Lloyd", "Forgy",
"MacQueen")

可以使用?kmeans查看具体用法在此不再赘述，万能的iris

data(iris)
newiris = iris[,-5]
(kc <- kmeans(newiris, 3))
table(iris$Species, kc$cluster)
plot(newiris[c("Sepal.Length", "Sepal.Width")], col = kc$cluster)
points(kc$centers[,c("Sepal.Length", "Sepal.Width")], col = 1:3, pch = 8, cex=2)
plot(newiris[c("Petal.Length", "Petal.Width")], col = kc$cluster)
points(kc$centers[,c("Petal.Length", "Petal.Width")], col = 1:3, pch = 8, cex=2)