在R中创建表格，其中使用formattable包将单元格设置为多种颜色

Question

我已经使用formattable包使用两种颜色创建单元格的条件格式设置（请参见下文）。但是我想使用三种颜色（红色，黄色，绿色），但是不确定如何做到这一点。甚至是某种颜色的光谱（使用RColorBrewer）。

library(tidyverse) 
library(kableExtra)
library(formattable) 

mtcars[1:5, 1:4] %>% 
  mutate(car = row.names(.)) %>% 
  select(car, everything()) %>% 
  arrange(-mpg) %>% 
  mutate(mpg = color_tile("red", "green")(mpg)) %>% 
  kable(escape = F) %>%
  kable_styling("hover", full_width = F)