1
library(tidyverse)
library(mclust)
mc <- Mclust(iris[,-5])
pairs(mc$data, pch = mc$classification)

该图为我提供了 Iris 数据的所有 K = 2 个集群的多个散点图对。现在我想重点关注 Sepal.Length VS Sepal.Width,并在图中添加簇(椭球)。换句话说,我想在下面复制这个图:

在此处输入图像描述

4

0 回答 0