R 进行因子分析 代码示例

以下是一个简单的因子分析示例，使用 psych 包进行计算：

# 加载 psych 包
library(psych)

# 读入数据
data <- read.csv("data.csv")

# 选择需要进行因子分析的变量
vars <- c("var1", "var2", "var3", "var4", "var5")

# 进行因子分析
result <- fa(data[, vars], nfactors = 2, rotate = "varimax")

# 输出结果
print(result)

解释：

1. 首先加载 psych 包，该包提供了进行因子分析的函数。

2. 读入数据，假设数据存储在 data.csv 文件中。

3. 选择需要进行因子分析的变量，这里选择了 5 个变量。

4. 调用 fa() 函数进行因子分析，其中 nfactors 参数指定了希望提取的因子数，rotate 参数指定了旋转方法，这里使用了 varimax 旋转方法。

5. 输出结果，结果包括了因子载荷矩阵、特征值、方差贡献率等信息。