example_plot = ggplot(example_sf) + geom_sf(color = "black", aes(fill = example_variable_name)) + geom_sf_label_repel(aes(label = ifelse(example_sf$state_fips %in% geom_repel_states, example_variable_name, ""))) + geom_sf_label(aes(label=ifelse(!(example_sf$state_fips %in% geo...