Question

虹膜数据集的简单示例。我必须使用<!DOCTYPE> <html> <head> <link rel="stylesheet" href="./pers.css"> <meta charset="utf-8"> <meta name="viewport" content="width=device-width"> </head> <body> <div class="box"> <div></div> </div> </body> </html>

[ORACLEHOME]\product\12.1.0\dbhome_1\jdk\jre\bin\java.exe

之后，我看到了群集和obzervation的数量

apcluster library

如何在R中保留属于集群的观察结果。

为了使我的帖子更清晰，在输出中我希望有这样一个表

library("apcluster")

#use dist() create a negative SimilarityMatrix
sim<-negDistMat(iris[,1:4],r=2)

#run the clusteralgorythm and create apclustert object apiris1
apiris1<-apcluster(sim,details=T)


apiris1=apclusterK(sim,details=T,K=2,verbose=T)

Answer 1

群集索引存储在apiris1@clusters中。你可以创建一个像你要求的那样的data.frame：

iris1 = iris
iris1$Save.cluster = 0
for(i in 1:length(apiris1@clusters)) {
    iris1$Save.cluster[apiris1@clusters[[i]]] = i }
head(iris1)
  Sepal.Length Sepal.Width Petal.Length Petal.Width Species Save.cluster
1          5.1         3.5          1.4         0.2  setosa            1
2          4.9         3.0          1.4         0.2  setosa            1
3          4.7         3.2          1.3         0.2  setosa            1
4          4.6         3.1          1.5         0.2  setosa            1
5          5.0         3.6          1.4         0.2  setosa            1
6          5.4         3.9          1.7         0.4  setosa            1

将观察属于R中的群集

1 个答案: