aggregate agents works (need to load in R)