在R中使用Formattable的平铺格式

Question

我想要做的是在基于计算的列上使用color_tile，而不是基于它自己的连续比例。我有代码来格式化以下示例中的文本颜色：

library(formattable)

my.df <- data.frame(
   Type = c("A", "B", "C", "D", "E"),
   Count = c(5, 7, 3, 8, 4),
   Expect = c(2, 6, 3, 15, 0)
 )

formattable(my.df, list(
  Type = formatter("span",
                   style = ~style(color = ifelse(Count/Expect - 1 > .2, "red", 
    ifelse(Count/Expect - 1 < -.2, "green", "black")))
                   )

  ))

这些是我想要的颜色，但是我想要有瓷砖而不是彩色文字。我还没弄明白我如何使用基于计算的color_tile或基于其自己的列值以外的其他内容。我可以使用瓷砖进行调节吗？