ユニークとは、滑稽なという意味ではなく、固有のという意味である。
名前の一覧nameがあり、複数の同じ名前があり所属が分かれている、それにインデックス番号などつけたければ、
df %>% group_by(name) %>% mutate(`在籍区分` = n_distinct(class)) %>% ungroup