model.frame.default变量长度与变量名列表中的错误不同

我试图使用聚合函数来显示特定子组分数的平均值。我有很多描述性变量，我想取两个变量的组合，找出每个组合组的平均值。所有变量都是分类的，有些变量有两个条目，而有些变量有多个条目。我不断地发现一个错误，虽然我在网上找到了一些线索，但我不确定该怎么办

variable_list <- c("gender","race","age", "disability", "job_level", "full_time_or_part_time", location", "office", "sex_orient")

for(i in 1:9){
  for(j in 1:9){
   holder <- aggregate(score ~ variable_list[i] + variable_list[j], survey, FUN=function(x) c(count=length(x), mean=mean(x) ))
   survey_combination <- bind_rows(survey_combination,holder)
  }

---

variable\u list在启动for循环之前，您需要设置/初始化
survey\u组合。或者像这样做：

firstTime = TRUE

variable_list <- c("gender","race","age", "disability", "job_level", "full_time_or_part_time", "location", "office", "sex_orient")

for(i in 1:9){
  for(j in 1:9){
    holder <- aggregate(score ~ variable_list[i] + variable_list[j], survey, FUN=function(x) c(count=length(x), mean=mean(x) ))

    if (firstTime) {
       survey_combination <- holder
       firstTime = FALSE
    } else {
       survey_combination <- bind_rows(survey_combination,holder)
    }

  }
}

firstTime=TRUE
变量列表在启动for循环之前，您需要设置/初始化
survey\u组合。或者像这样做：

firstTime = TRUE

variable_list <- c("gender","race","age", "disability", "job_level", "full_time_or_part_time", "location", "office", "sex_orient")

for(i in 1:9){
  for(j in 1:9){
    holder <- aggregate(score ~ variable_list[i] + variable_list[j], survey, FUN=function(x) c(count=length(x), mean=mean(x) ))

    if (firstTime) {
       survey_combination <- holder
       firstTime = FALSE
    } else {
       survey_combination <- bind_rows(survey_combination,holder)
    }

  }
}

firstTime=TRUE
变量列表您在
位置
之前缺少一个
“
。在
位置
之前缺少一个
”
。