R 双批次中的标记点

我在

R

中执行了PCA并绘制了一个双图

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))

试着给予

rownames(data)<-data[,1] 

---

rownames（data）如果不想在原始数据集（“df”，如下所示）上设置行名，也可以将xlabs参数传递给biplot：

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

pTry giving
rownames（数据）@GeorgeDontas谢谢@乔治顿斯+1，如果你把它转换成一个答案。