https://r4stats.com/2017/04/18/group-by-modeling-in-r-made-easy/