ggplot(Express, mapping = aes(x=X, y=Y,col = clustering))+geom_point(size = 0.5,alpha=0.7)+scale_color_gradient(‘clustering’, low = “red”, high = “blue”)
Express
c
l
u
s
t
e
r
i
n
g
=
f
a
c
t
o
r
(
E
x
p
r
e
s
s
clustering=factor(Express
clustering=factor(Expressclustering)
#Express$clustering表示获取Express中的cluster列 并转化其类型
#将聚类编号的整型int改成factor类型,才能画出不同的颜色
#因子(factor)数据的类型分为名义型、有序型和连续型,其中名义型和有序型被称为因子,默认因子排序是按照字符排序
ggplot(Express,aes(x=X, y=Y,col = clustering))+geom_point()
K-means聚类画图
site=“https://mirrors.tuna.tsinghua.edu.cn/CRAN”
package_list = c(“factoextra”,“cluster”)
for(p in package_list){
if(!suppressWarnings(suppressMessages(require(p, character.only = TRUE, quietly = TRUE, warn.conflicts = FALSE)))){
install.packages(p, repos=site)
suppressWarnings(suppressMessages(library(p, character.only = TRUE, quietly = TRUE, warn.conflicts = FALSE)))
}
}
##kmeans聚类
#km.res = kmeans(Express, 20)
#fviz_cluster(km.res,Express)