R中导入Excel执行PCA(ACP)时变量非量化错误的解决咨询

问题根源 #

你的Excel数据虽显示为数值格式，但导入R后被识别为字符型，核心原因大概率是法语区常用逗号作为小数点分隔符，而read_excel默认以点为小数点，导致带逗号的"数值"被当成文本读取；也可能是Excel单元格实际存储为文本格式。

分步解决 #

1. 确认数据类型
   先运行以下代码，明确哪些列被识别为字符型：

str(ACP_DATA_TABLEUR)
# 或更简洁的方式查看每列类型
sapply(ACP_DATA_TABLEUR, class)

2. 针对逗号小数点的导入修正
   如果你的Excel数值用逗号做小数点，加载readr包后，通过locale参数指定小数点分隔符重新导入：

library(readxl)
library(readr)

ACP_DATA_TABLEUR <- read_excel(
  "C:/Users/Dan/Desktop/ACP DATA TABLEUR.xlsx",
  locale = locale(decimal_mark = ",")
)

3. 手动批量转换字符型变量为数值
   若重新导入仍无效，直接对字符型列做转换：

# 筛选所有字符型列
char_columns <- sapply(ACP_DATA_TABLEUR, is.character)

# 批量替换逗号为点，再转为数值型
ACP_DATA_TABLEUR[char_columns] <- lapply(ACP_DATA_TABLEUR[char_columns], function(col) {
  as.numeric(gsub(",", ".", col))
})

4. 排除非分析变量
   如果X列是行标识或非数值列，运行PCA时需排除该列：

res.pca <- PCA(ACP_DATA_TABLEUR[, -1], graph = FALSE)

5. 验证结果
   转换后再次检查变量类型，确认全为数值型后重新运行PCA即可。

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