如何在 R 中为数据框着色

我有以下类型的数据框

> df
              V1 V2 V3 V4 V5
1   10.603.3.100  2  1  5  1
2   10.603.3.101  3  2  4  5
3   10.603.3.102  1  3  3  2
4   10.603.1.103  4  4  3  3
5   10.603.3.104  5  5  1  4

任务是通过任意调色板按列 V2、V3、V4、V5 对值进行着色。但不幸的是我完全不知道该怎么做。该论坛找到了用两种颜色着色的问题的答案。

相似的东西

如果我正确理解你的问题那么你可以使用library(DT)为您的列着色，如下所示：

?datatable来自 DT 包：

该函数创建一个 HTML 小部件来显示矩形数据（ 矩阵或数据框）使用 JavaScript 库 DataTables。

df <- head(iris, 10)
library(tidyverse)
library(DT)

datatable(df, rownames = FALSE) %>%
  formatStyle(columns = "Sepal.Length", 
              backgroundColor = "yellow") %>%
  formatStyle(columns = "Sepal.Width", 
              backgroundColor = "blue") %>%
  formatStyle(columns = "Petal.Width", 
              backgroundColor = "green") 

OP添加图片后新的编辑:

df <- data.frame(cbind(matrix(round(rnorm(50), 3), 10), sample(0:1, 10, TRUE)))


breaks <- quantile(df, probs = seq(.05, .95, .05), na.rm = TRUE)
colors <- round(seq(255, 40, length.out = length(breaks) + 1), 0) %>% 
  {paste0("rgb(255,", ., ",", ., ")")}
datatable(df) %>% formatStyle(names(df), backgroundColor = styleInterval(breaks, colors))

您可以从以下位置查看更多内容here https://rstudio.github.io/DT/010-style.html:

上面的例子是直接取自上面的地方，请注意，如果你想改变颜色，你必须改变“颜色”对象与不同的RGB值，例如，如果你改变上面的字符串 这：

colors <- round(seq(255, 40, length.out = length(breaks) + 1), 0) %>% 
  {paste0("rgb(", ., ",255,", ., ")")}

你会得到鹦鹉绿色的味道而不是红色的。