it appears that there is an error in the code related to the summarize()
function. Specifically, the error message indicates that there is a problem with the vec_proxy_compare()
country_counts <- data %>%
group_by(country) %>%
summarize(total= n(), .groups="drop_last") %>%
arrange(desc(total))