我正尝试使用组数据预测我的值。提出mtcars数据后，发现较早提供哪种解决方案存在一些困难。 例如，如果您有一个包含相同变量的测试数据集，那么我将其称为mtcars_test。 但最后一段提供了错误
mtcars_test = mtcars
test_split = split(mtcars_test, mtcars_test$cyl)
regs = mtcars %>%
group_by(cyl) %>%
nest() %>%
mutate(fit = map(data, ~lm(wt ~ mpg + qsec + gear, .)))
给出错误的最后一个说明“错误：列testpred的长度必须为1（组大小），而不是3”
regs %>%mutate(testpred = map2(fit, test_split, predict)) %>%unnest(testpred)