Error in UseMethod("group_by_") :
no applicable method for 'group_by_' applied to an object of class "function"
Calls: %>% ... summarize -> -> group_by.default -> group_by_
In addition: Warning message: group_by_() is deprecated as of dplyr 0.7.0.
Please use group_by() instead.