# NOT RUN {
data(covid19nytimes_states_demo)
require(dplyr)
# Get top confirmed cases by county,state
covid19nytimes_states_demo %>%
filter(data_type == "cases_total") %>%
filter(value == max(value))
# }
Run the code above in your browser using DataLab