r - “`[.data.frame`(x, order(x, na.last = na.last, reduction = reduction)) 中的错误：为 pca 的 ggbiplot 选择了未定义的列

Question

我正在对我拥有的数据集执行主成分分析。这是我迄今为止使用的代码：

pca1<-prcomp(data1,center=TRUE,scale=TRUE)
summary(pca1)
pca1$rotation
pca1$sdev^2
library("devtools")
library("ggbiplot")
plot1 <- ggbiplot(pca1,obs.scale=1, var.scale=1, groups=data2, ellipse=TRUE)

我得到错误：

Error in `[.data.frame`(x, order(x, na.last = na.last, decreasing = decreasing)) : undefined columns selected 供您参考，“data1”是一个只有数值变量的数据框，“data2”包含一列分类变量，我试图通过这些变量对数值变量进行分组。两个数据集的行数相同。我之前在非常相似的数据集上运行了这个确切的代码，没有任何问题。

关于可能是什么问题的任何建议？

标签： rpcaggbiplot