Colors 如何使用大地水准面值手动设置具有特定颜色的某些多边形？

我想用特定的颜色显示某些多边形。

GEOID

变量在学校数据集中设置。另外，我在下面创建了schools4以减少列数，但是如果我需要使用第一个schools数据集，那也没问题。我希望在

GEOID

变量中使用特定颜色设置总共16个值

这是我到目前为止的代码

GEOID
123
234
345

install.packages('tigris')
library(tigris)
library(leaflet)
school_districts()
schools <- school_districts("Texas")
View(schools)

myvars <- c("GEOID", "NAME", "geometry")
schools4 <- schools[myvars]
leaflet(schools4) %>% addProviderTiles("CartoDB.Positron") %>% addPolygons(fillColor = "grey", color = "black", weight = 0.5)

大地水准面
123
234
345
安装.packages（'tigris'））
图书馆（底格里斯）
图书馆（单张）
学区（）
学校