グループ/レベルごとにデータの回帰を実行しています。したがって、各レベルのreg、つまり私のコードは次のようになります。
library('dplyr')
regressions <- mtcars %>%
group_by(cyl) %>%
do(mod = lm(mpg ~ wt, .))
同じグループを持つ小さな newdata セットで予測を抽出するにはどうすればよいですか? つまり、レベルは同じですが、サンプルが少なくなっています。すべてのレベルの新しいデータ セットで一度に予測を実行したいと考えています。ほうきの「オーグメント」が予測を提供することを私は知っています。しかし、すべてのレベルを一度に行う方法がわかりません。
私が使用したコードは次のようになります。
library('broom')
aa <- as.data.frame(augment(regressions, newdata=test))
私も試しました
aa <- as.data.frame(augment(regressions, mod, newdata=test))
これは適合値を与えましたが、元のデータと一致するように新しいデータを複製していましたが、各観測の予測は異なりました。私のデータには 44 のレベルがあり、さらに多くのことを行う必要があります。助けてくれてありがとう。