使用此代码,我可以理解我可以绘制单个集群。
library(fpc)
set.seed(665544)
n <- 600
x <- cbind(runif(10, 0, 10)+rnorm(n, sd=0.2), runif(10, 0, 10)+rnorm(n,sd=0.2))
ds <- dbscan(x, 0.2)
plot(x[ds$cluster %in% 1:3,])
对于上面的代码,我得到以下输出,
ds
dbscan Pts=600 MinPts=5 eps=0.2
0 1 2 3 4 5 6 7 8 9 10 11
border 28 4 4 8 5 3 3 4 3 4 6 4
seed 0 50 53 51 52 51 54 54 54 53 51 1
total 28 54 57 59 57 54 57 58 57 57 57 5
我得到了所有 11 个集群。
如果我想在特定集群中显示数据,我需要为此编写什么 R 脚本。