我正在使用聚合函数在一个称为“阈值”的数据框中求和许多数字变量。当我使用手动输入的列名实现代码时，代码可以正常工作，但是当我使用粘贴添加大量列名时，它将引发以下错误：
Summary.factor（c（46L，1L，12L，23L，34L，45L，47L，48L，49L， ：“总和”对因素没有意义另外：警告消息： cbind（noquote（paste0（paste0（“ Tabove”，0:50，“ C”），sep =“，”）），：
结果的行数不是向量长度（arg 1）的倍数
引发错误的粘贴代码：
stage1sum <- aggregate(formula = cbind(noquote(paste0(paste0("Tabove",0:50,"C"),sep=",")),
ppt_cm) ~ Veg_s1 + Location, data=thresh, FUN = sum)
正常工作的手动代码：
stage1sum <- aggregate(formula = cbind(Tabove0C, Tabove1C, Tabove2C, Tabove3C,
ppt_cm) ~ Veg_s1 + Location, data=thresh, FUN = sum)
我正在使用R版本3.4.0和RStudio版本1.0.143。我所有的列都是聚合中的数字。谁能帮助我了解为什么会产生此错误？