Can I append additional columns to a grouped and summarised dataframe in r [duplicate]