データセットのサンプルで PCA を計算し、最初の 2 つのコンポーネント ベクトルを保持しました。次に、これらの最初の 2 つのコンポーネントで k=3 の k-means クラスタリングを計算しました。次に、最初の 2 つの固有関数 (PCA から) とクラスター グループに基づく色を使用して、2D 散布図をプロットする必要があります。散布図ですべてを達成しましたが、プロットを見ると、クラスター化されているサンプルを区別できないため、散布図のポイントにサンプル ラベルを追加したいと考えています。誰かがこれについてどうすればよいか教えてもらえますか?
tdata<-t(subdata)
pca <- prcomp((tdata),cor=F)
dat.loadings <-pca$x[,1:2]
cl <- kmeans(dat.loadings, centers=3)
pca1 <-pca$x[,1]
pca2 <-pca$x[,2]
plot(pca1, pca2,xlab="PCA-1",ylab="PCA-2",col=cl$cluster)
ありがとうございました