代码之家 › 专栏 › 技术社区 › alfredopacino

R中的簇散点图

alfredopacino · 技术社区 · 7 年前

我是新来的,我搜索过,但我只找到过时的信息。

d<-dist(scale(DATA),method="euclidean",diag=TRUE,upper=TRUE)
hls<-hclust(d,method="complete")

如何绘制每个簇使用一种颜色的散点图?

就像这个例子

1 回复 | 直到 6 年前

MatAff 7 年前

我创建了一些示例数据。如果您的数据看起来不同,请提供一些样本数据作为您的问题的一部分。

要创建按组着色的散点图,请首先使用cutree函数创建组。可以指定一个整数值,以指示要如何创建组。

接下来使用您最喜欢的绘图包(例如ggplot)创建散点图。

# Sample data
rData <- data.frame(x=c(1,1,3,4), y=c(1,2,5,4))
print(rData)

# Cluster
d <- dist(scale(rData), method="euclidean", diag=TRUE, upper=TRUE)
hls <- hclust(d, method="complete")

# Create groups
cluster <- cutree(hls, 2)

# Create scatter plot
ggData <- cbind(rData, cluster)
ggData$cluster <- as.factor(ggData$cluster)
print(ggData)
ggplot(ggData, aes(x=x, y=y, color=cluster)) + geom_point(size=5)

我建议你去探索一下 http://www.cookbook-r.com/Graphs/