如何在 R 项目中使用 fviz_cluster 更改符号和颜色
How to change the symbol and colour using fviz_cluster in R project
我正在使用 R 制作 。
我的代码如下:
cluster<- fviz_cluster(final, data = y, labelsize = 1, ellipse.type = "convex",
ellipse.alpha = 0 )
cluster + theme(axis.line = element_line(),
panel.grid.major = element_blank(),
panel.grid.minor = element_blank(),
panel.border = element_blank(),
panel.background = element_blank())
这是我删除所有背景色后的结果。
所以我有一个问题,如何将群集 1 的符号从椭圆形更改为加号?
您可以使用以下代码
library(factoextra)
data("iris")
head(iris)
# Remove species column (5) and scale the data
iris.scaled <- scale(iris[, -5])
# K-means clustering
km.res <- kmeans(iris.scaled, 3, nstart = 10)
# Visualize clustering
cluster <- fviz_cluster(km.res, data = iris[, -5], labelsize = 1,
ellipse.type = "convex",
ellipse.alpha = 0) +
scale_shape_manual(values=c(3,17,19))
cluster + theme(axis.line = element_line(),
panel.grid.major = element_blank(),
panel.grid.minor = element_blank(),
panel.border = element_blank(),
panel.background = element_blank())
我正在使用 R 制作
cluster<- fviz_cluster(final, data = y, labelsize = 1, ellipse.type = "convex",
ellipse.alpha = 0 )
cluster + theme(axis.line = element_line(),
panel.grid.major = element_blank(),
panel.grid.minor = element_blank(),
panel.border = element_blank(),
panel.background = element_blank())
这是我删除所有背景色后的结果。 所以我有一个问题,如何将群集 1 的符号从椭圆形更改为加号?
您可以使用以下代码
library(factoextra)
data("iris")
head(iris)
# Remove species column (5) and scale the data
iris.scaled <- scale(iris[, -5])
# K-means clustering
km.res <- kmeans(iris.scaled, 3, nstart = 10)
# Visualize clustering
cluster <- fviz_cluster(km.res, data = iris[, -5], labelsize = 1,
ellipse.type = "convex",
ellipse.alpha = 0) +
scale_shape_manual(values=c(3,17,19))
cluster + theme(axis.line = element_line(),
panel.grid.major = element_blank(),
panel.grid.minor = element_blank(),
panel.border = element_blank(),
panel.background = element_blank())