为什么PCA代码没有运行，矩阵是0х0？

Question

df_scaled <- as.data.frame(scale(df))
features <- df_scaled[, -10]
target <- df_scaled[, 10]
pc <- PCA(features, graph = FALSE)
print(pc)

本征误差（crossprod（t（X），t（X）），对称= TRUE）：0х0矩阵

哪里出错了？

我有 19178 个 obs。 29个变量，所以程序不运行很奇怪