要进行因子分析（Factor Analysis）并输出结果，可以使用R语言中的psych包。下面是一个示例代码：

# 安装并加载psych包
install.packages("psych")
library(psych)

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

# 进行因子分析
result <- principal(data, nfactors = 3, rotate = "varimax")

# 输出因子分析结果
print(result)

# 输出因子载荷
print(result$loadings)

# 输出公共因子方差
print(result$communality)

# 输出特征值
print(result$values)

上述代码中，假设数据存储在名为data.csv的文件中，要进行因子分析的列存储在data变量中。nfactors参数指定要提取的因子数量，rotate参数指定旋转方法（这里使用varimax旋转）。结果存储在result变量中，并通过print函数输出。

要输出因子载荷（factor loadings），可以使用result$loadings。要输出公共因子方差（communality），可以使用result$communality。要输出特征值（eigenvalues），可以使用result$values。

注意，这只是一个简单的示例代码，具体的操作还需要根据数据和分析需求进行调整。