2

我想做的是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基于计算或基于其自身列值以外的其他内容来使用它。我可以使用瓷砖进行调理吗?

4

0 回答 0