根据R中的条件为数据帧着色单元

Question

我有一个像这样的数据框：

>df
id  prev_score  cur_score   change
1      10          8         -2
2      8           9          1
3      6           7          1
4      8           8          0
5      8           9          1

我想根据prev_score列的值为change列单元格着色。例如，if df$change[i] > 0，df$prev_score[i]单元格颜色应为深蓝色，if df$change[i] == 0，df$prev_score[i]单元格颜色应为蓝色，而if df$change[i] < 0，df$prev_score[i]单元格颜色应为浅蓝色。

Answer 1

在您的问题中，如果要更改文本或单元格的颜色，tt尚不清楚

对于文本的颜色，可以使用formattable：

library(formattable)
formattable(df, list(
  prev_score = formatter("span", 
                         style = ~style(font.weight = "bold", color = 
                                          ifelse(change > 0,"darkblue",
                                                 ifelse(change == 0,"blue",
                                                        ifelse(change <0, "lightblue",NA)))))
))

它回答了您的问题吗？

可复制的示例

df <- data.frame(id = 1:5,
                     prev_score = c(10, 8, 6, 8, 8),
                     cur_score = c(8, 9, 7, 8, 9),
                     change = c(-2, 1, 1, 0, 1))