Using functions inside nested data frames with map

Question

I have a nested data frame with 14 groups, each group containing 3 variables in the data column. I want to eliminate observations with a unique "unhashed_id", as follows.

.x <- data_nest %>% pluck("data", 1) %>% group_by(unhashed_id) %>% filter(n()>1) %>% summarise(count=n()) %>% tally(count)
.x <- data_nest %>% pluck("data", 2) %>% group_by(unhashed_id) %>% filter(n()>1) %>% summarise(count=n()) %>% tally(count)

Rather than repeating this process 14 times, how do I use map to do this for all 14 groups?