Я решил улучшить свои навыки создания карт sh и использую общедоступные данные COVID: https://www.kaggle.com/sudalairajkumar/covid19-in-usa
Ниже мой код:
USdata <- us_states_covid19_daily %>%
group_by(state)%>%
summarise(values = sum(positive))
#Assign each state its fips code using fips()
USdata$state <- as.numeric(fips(USdata$state))
USdata$values <- as.numeric(USdata$values)
#Rename columns appropriately
names(USdata)[names(USdata) == "state"] <- "fips"
USdata <- na.omit(USdata)
plot_usmap(data = USdata)
Я продолжаю получать эту ошибку:
Error in `[.data.frame`(map_df, , values) : undefined columns selected
Вот как выглядит мой фрейм данных:
> head(USdata)
# A tibble: 6 x 2
fips values
<dbl> <dbl>
1 2 1908
2 1 16845
3 5 9084
4 4 21232
5 6 128974
6 8 44905
Мой фрейм данных также может выглядеть так, если я удаляю строка кода:
> head(USdata)
# A tibble: 6 x 2
fips values
<fct> <dbl>
1 AK 1908
2 AL 16845
3 AR 9084
4 AZ 21232
5 CA 128974
6 CO 44905
Кто-нибудь знает, что я делаю не так?