2

プロット機能が使えます。プロットを使用して、主成分分析の結果を取得できます。rownames(Sample)しかし、 1から90までの番号が付けられた私のデータポイントに従ってこれらのポイントにラベルを付ける方法がわかりません

Sample<-read.table(file.choose(),header=F,sep="\t")
Sample.scaled<-data.frame(apply(Sample_2XY,2,scale))
Sample_scaled.2<-data.frame(t(na.omit(t(Sample_2XY.scaled))))

pca.Sample<-prcomp(Sample_2XY.scaled.2,retx=TRUE)

pdf("Sample_plot.pdf")
plot(pca.Sample$x)
dev.off()
4

1 に答える 1

5

最初の 2 つのコンポーネントをプロットする簡単な方法を次に示します。

plot( pca.Sample$x[,1], pca.Sample$x[,2] )
text( pca.Sample$x[,1], pca.Sample$x[,2], rownames( Sample ), pos= 3 )

ちなみに、外出先で通常のデバイスを使用してプロットを表示し、そのデバイスの内容を PDF にコピーできます。

dev.copy2pdf( file= "something.pdf" )
于 2012-11-13T22:08:48.333 に答える