R语言PCA报错：'x' must be numeric，求错误原因及解决

错误原因 #

prcomp()执行PCA时要求输入的数据集所有列必须是数值类型，你遇到的'x' must be numeric报错，说明数据框df中存在非数值型的列（比如因子、字符类型，哪怕视觉上是数字格式）。

解决步骤 #

1. 检查数据类型
   先查看每列的具体类型，定位非数值列：

str(df)

输出中如果出现Factor或character类型的列，就是导致报错的原因。

2. 转换或排除非数值列

• 如果是Month/Year这类看似数字但实际是因子的列，转换为数值型：

df$Month <- as.numeric(as.character(df$Month))
df$Year <- as.numeric(as.character(df$Year))

• 如果存在其他非数值列（比如分类变量），确认是否需要参与PCA：PCA仅处理数值变量，这类列要么转换为数值编码，要么从PCA分析中排除。

3. 筛选数值列执行PCA
   如果不需要保留非数值列参与分析，直接筛选所有数值型列再运行PCA：

# 提取所有数值型列
df_numeric <- df[, sapply(df, is.numeric)]
# 执行主成分分析
df.pca <- prcomp(df_numeric, scale = TRUE)

4. 验证PCA结果
   使用factoextra工具查看分析结果：

# 查看各主成分的方差解释率
fviz_eig(df.pca)
# 查看变量在主成分上的贡献
fviz_pca_var(df.pca)

内容的提问来源于stack exchange，提问作者user18343293