R 在回归模型中使用主成分组合

我有一组51个变量，我应用了主成分分析，并根据Kaiser-Guttman标准选择了六个因素。我使用R进行分析，并使用以下函数进行分析：

---

prca.searchwords您可以使用字符串操作函数构建运行中所涉及的所有公式，然后将这些公式转换为属性公式，并应用于要运行的模型列表。比如说

vars <- paste0("prca.searchwords.",1:6,".ts")

resp <- unlist(lapply(1:6, function(i) apply(combn(vars,i), 2, paste, collapse=" + ")))

result <- lapply(resp, function(r) {
    do.call("dynlm", list(as.formula(paste0("monthly.privateconsumption.ts ~ ", r))))
})

vars