双标图中的标记点

Question

我已经执行了PCA并在R中绘制了一个双标图。

pca1= princomp (~ data$X250 + data$X500 + data$shear, scores=TRUE, cor=TRUE, rownames=data[,1])
biplot(pca1, xlab="PC 1", ylab="PC 2", pch=20)

目前双标图上的标签是行号，但我希望点标签是我数据的图名。我的数据有81行。

我试过了：

text (pca1[1:81], pca1[1:81], labels = row.names(data))
text (1:81, 1:81, labels = row.names(data))
text (pca1$comp.1[1:81], pca1$comp.2[1:81], labels = row.names(data))

Answer 1

尝试给予

rownames(data)<-data[,1] 

使用princomp之前

Answer 2

如果您不想在原始数据集上设置rownames（＆＃34; df＆＃34;，下面），您也可以通过传递 xlabs 参数来完成双版：

p<-princomp(df) 
biplot(p,xlabs=df[,1])