Uso de summarize, slice_max e count juntos

Neste capítulo, você aprendeu a usar seis verbos do dplyr relacionados à agregação: count(), group_by(), summarize(), ungroup(), slice_max(), e slice_min(). Neste exercício, você os combinará para responder a uma pergunta:

Em quantos estados há mais pessoas vivendo em áreas metropolitanas do que em áreas não metropolitanas?

Lembre-se de que a coluna metro tem um dos dois valores "Metro" (para áreas urbanas de alta densidade) ou "Nonmetro" (para áreas suburbanas e rurais).

counties_selected <- counties %>%

  select(state, metro, population)