在dplyr
中,使用group_map
可以生成lm()模型,并将系数合并到一个 Dataframe 中。我想将组信息和Adjusted_R_squared添加到最终的data.fame中。
目前我键入值作为向量并添加到data.frame。有什么方便的方法吗?
library(dplyr)
library(data.table)
models <- iris %>%
group_by(Species) %>%
group_map(~ broom::tidy(lm(Petal.Length ~ Sepal.Length,data=.x))) %>%
rbindlist()
models$Species <- c('setosa','setosa','versicolor','versicolor','virginica','virginica')
models$Adjusted_R_squared <- c('0.05204','0.05204','0.5596','0.5596','0.7416','0.7416')
1条答案
按热度按时间l7wslrjt1#
如果你在你的
group_map()
中打开一个函数,你可以对你的输出进行更多的定制,比如: